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PREFACE 


This publication# together with the VM/ SP Syste m Loaic and Problem Determinatio n 
Guide# Volumes X and 2# is intended for use by system programmers responsible for 
updating VM/SP. 


HOH THIS MANUAL IS ORGANIZED 
This manual is one of two volumes* 

• Volume 1 - Control Program (CP) 

• Volume 2 - Conversational Monitor System (CMS) 

This volume contains descriptions of the major data areas and control blocks used by 
the Conversational Monitor System (CMS). there is only one section with two 
appendixes# as follows* 

• "CMS Data Areas and Control Blocks" contains information about CMS data areas and 
control blocks. 

• "Appendix A. CMS Equate Symbols" contains assembler language equate symbols used 
by CMS to reference data. 

• "Appendix B. CMS Data Areas and Control Block References" contains information on 
the modules that reference data areas and control blocks. 

Each data area and control block included in this book is described at the beginning 
of the block. The descriptive statement is followed by a graphic representation of 
the arrangement of the fields. After the graphic representation# the fields are 
described as follows* 

• the hexadecimal displacement 

• the name of the field 

• its length (decimal) 

• some use a key (This key is used in th« graphic if the name (up to 8 letters) 
does not fit in the allocated space.) 

• a brief description. 

The cross reference lists the fields in alphabetical order. When a field equates 
with a value greater than X’FF’# the '*#* symbol is used. Refer to the field 
description for the correct value. 


OTHER VM/SP DATA AREAS AND CONTROL BLOC KS 

Some data areas and control blocks that affect VM/SP service and support programs 
are not included in this publication. Information on these data areas and control 
blocks can be found in the Virtual Machine/Svstem Product * Service P outines Pro gram 
Logic# LY20-089Q. 
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CMS DATA AREAS AND CONTROL BLOCKS LOGIC 


This volume contains descriptions of the CMS data areas and control blocks, 
figure below shows how the control blocks interrelate. 


SYSREF 


600 V(FVS) 

608 V(DEVTAB) 
610 V(GETCLK) 
618 V(PIE) 


V(OPSECT) 

V(FSTLKP) 

V(FSTLKW) 

V(IADT) 


620 V(USERSECT) V(DMSDIOR) 
628 V(DMSSCNN) A(0) 


630 V(TABEND) 

638 V(DMSSVT) 


V(SUBSECT) 

V(DMSDIOW) 


640 I V(DMSSTGST) V(ADTSECT) 


648 |V(FREE) 


V(FRET) 


650 I V(DMSPIOCC) V(PGMSECT) 


658 I V(IOSECT) 


V(DMSDBD) 


660 I V(DIOSECT) V(DMSABNUA) 


668 I V(DMSERL) 


V(DMSCRD) 


670 I V(DMSFREB) V(SVCSECT) 


678 V(ADTLKP) 
680 A(0) 


V(DMSAUDUP) 

V(DMSITSOR) 


V(DMSITSCR) V(DMSSCNO) 


690 I V(DMSEXI) 


V(DMSLDRA) 


698 V(ADTLKW) V(USABRV) 

6A0 V(EXTSECT) V(SCBPTR) 

6A8 V(DMSROS) A(0) 


6B0 V(ACTLKP) V(DMSLAFNX) 
6B8 V(DMSLAFFE) V(DMSLAFFT) 
6C0 V(ADTNXT) VfnMSTRK) 


6C0 I V(ADTNXT) 


V(DMSTRK) 


6C8 V(DMSTRKX) V(DMSTQQ) 
6D0 V(DMSTQQX) V(DMSERS) 
6D8 V(TYPSRCH) V(DMSAUD) 




6E0 V(KILLEX) 
6E8 V(DMSBRD) 
6F0 V(DMSFNS) 


V(DMSFNST) 

V(DMSBWR) 

V(DMSSTTE) 



DMSNUC 

USERSECT 

SUBSECT 

TSOBLKS 

DMSERL 


DBGSECT 

IOSECT 

CMSCVT 

PGMSECT 

DMSABW 

EXTSECT 

DMSERT 

DIQSECT 

USABRV 

SYSNAMES 

DMSFRT 


SVCSECT 

AFTSECT ~ 

ADTSECT — 

_ PEVTAB _ 

DOSCON 

AVSAMSYS 

Termin«l Buffer and Saveareat 
SYSREF 
FREELIST 
MAINLIST 
PRECMND 
SYSNAME 
INSTALID 
SYSEMID 


-Free Storage- 


IOBDCBPT IOBECBPT 


AFT 

continued 



NUCON 
(See Legend) 


6F8 I V(DMSSTTW) V(POINT) 


Legend: 

The projection of SYSREF is a 
sampling of areas within NUCON. 
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ABNXTCB 


ABNXTCB; ABEND EXIT CONTROL BLOCK 

This block is created whenever a user establishes an abend exit; it contains 
information about the abend. ABNXTCB is invoked by the ABNXTCB macro. 


ABNXPREV 

ABNXADDR 

ABNXUWRD 

A*1 

/////////////// 


SIZE 

BLOCK LENGTH (DOUBLE WORD) (ABNXTCBL) 02 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

ABNXPREV 

4 

ADDRESS OF PREVIOUS BLOCK 

4 

ABNXADDR 

4 

EXIT ROUTINE ADDRESS 

8 

ABNXUWRD 

4 

USER WORD ADDRESS 

C ABNXFLAG 1 A*1 

Values Defined in ABNXFLAG 

80 

D 

ABNXDRVN 

3 

EXIT DRIVEN FLAG 

RESERVED FOR IBM USE 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

ABNXADDR 0004 .. ABNXFLAG 000C .. ABNXPREV 0000 .. ABNXTCBL 0000 02 
ABNXDRVN 000C 80 ABNXUWRD 0008 .. 
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ABWSECT: ABEND RECOVERY WORKSPACE 

ABWSECT describes the fields used for saving registers and other data during abend 
recovery. V-constants in DMSABN, DMSDBG, DMSFRE, DMSITI, DMSITP, and DMSITS point 
to the ABWSECT block. ABWSECT is defined in CSECT DMSABW in module DMSNUC. 


o 



1 


L_ 

ABNREGS 


40 

ABNPSW I 

48 


ABNRR j 


50 






ABNPAS13 

~ 

90 


i 



= 

ABNCMSG 

:: 

F0 


j ABNUWRD 




SPACE FOR DMSERR PLISTS 



i 


ABNERLST 

IZZZ 


ABNLENPL 


ABNSCBN 



HEX 

DISP NAME LEN KEY DESCRIPTION 


0 

ABNREGS 

64 

40 

ABNPSW 

8 

48 

ABNRR 

4 

4C 

ABNPAS13 

72 


REGISTERS AT TIME OF ABEND 
PSW AT TIME OF ABEND 
TEMPORARY SAVEAREA 
AREA PASSED TO NUCLEUS ROUTINES 
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ABWSECT 


DISP NAME LEN KEY DESCRIPTION 

94 ABNCMSG 96 CONSOLE MESSAGE SAVE AREA FOR IPCS 

F4 ABNUWRD 4 ABEND EXIT USER WORD 

SPACE FOR DMSERR PLISTS 
4C ABNERLST 47 

F8 ABNLENPL 4 LENGTH OF THE TOKENIZED PLIST USED BY DMSABN AND DMSINT 

FC ABNSCBN 8 USED TO SAVE A NUCLEUS EXTENSION NAME TEMPORARILY 


CROSS REFERENCE (Name Disc Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ABNCMSG 

0094 .. 

ABNPAS13 004C .. 

ABNREGS 

0000 . . 

ABNSCBN 

00FC .. 

ABNERLST 

ABNLENPL 

004C .. 
00F8 .. 

ABNPSW 0040 .. 

ABNRR 

0048 .. 

ABNUNRD 

00F4 .. 
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ADTSECT: ACTIVE DISK TABLE 

ADTSECT describes the attributes of virtual disks (A-Z) accessed by a virtual 
machine via the ACCESS command. Space is allocated for the ADT when DMSNUC is 
assembled. In the ADT, certain fields are defined for use by both CMS and OS. For 
example, ADTHBCT field at displacement 1C (hexadecimal) into ADTSECT is also defined 
as OSADTVTA for use by OS simulation routines. ADTSECT is invoked by the ADT macro. 


D 

ADTPTR 

ADTBWPTR 

8 

ADTDTA 

ADTFDA 

m 

ADTDFP1 

ADTDFP2 

18 

ADTDFP3 

ADTHBCT 

20 

ADTFSTC 

ADTCHBA 

28 

ADTCFST 

ADT1ST 

30 

ADTBKCYL 

0SADTSV1 

38 

ADTLEFT 

ADTLAST 

40 

///////////////////// 

> 

* 

— 

> 

* 

ro 

— 

3> 

>K 

CM 

— 

3> 

* 

4N 

48 

A*5 | A*6 

AX7 |///// 

ADTDISKC 

50 

ADTSECTR 

///////////////////// 

58 

ADTMSK 

ADTAMPl 

60 

ADTAMP2 

ADTAMP3 

68 

ADTDAMAP 

ADTLHBA 

70 

ADTLFST 

ADTANACN 

78 

ADTARES 

ADTXNREC 

80 

ADTXAREC 

ADTCHMAP 

88 

ADTAHTAB 

///////////////////// 

90 

ADTIDENT 

ADTID 

98 

(cont.) 

ADTVER 

ADTDBSIZ 

A0 

ADTD0P 

ADTCYL 

A8 

ADTMCYL 

ADTNUM 

B0 

ADTUSED 

ADTFSTSZ 

B8 

ADTNFST 

ADTDCRED 
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ADTSECT 


CO 
C8 
DO 
D8 

SIZE 

LENGTH OF FULL ADT BLOCK (BYTES) (ADTLB) EO 
LENGTH OF THE LABEL PORTION (ADTLABSZ) 50 
LOGICAL RECORD LENGTH (ADTRL) 320 

LENGTH OF MINIMUM ADT BLOCK (BYTES) IN DOUBLEWORDS (ADTLBM) 58 
LENGTH OF FULL ADT BLOCK (ADTLD) 1C 
LENGTH OF MINIMUM ADT BLOCK (ADTLDM) OB 
MAXIMUM BIT MAP LENGTH (ADTMXBML) 0A 

HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 




0 

ADTPTR 

4 

POINTER TO NEXT 

ADT 

BLOCK IN CHAIN 

4 

ADTBWPTR 

4 

ADDRESS OF PREVIOUS 

ADT 

(BW CHAIN) 

8 

ADTDTA 

4 

DEVICE TABLE ADDRESS 

IN 

NUCON 

C 

ADTFDA 

4 

FILE DIRECTORY 

(PSTAT) 

ADDRESS 

10 

ADTDFP1 

4 

DIRECTORY FILE 

LEVEL 

1 

POINTER 

14 

ADTDFP2 

4 

DIRECTORY FILE 

LEVEL 

2 

POINTER 

18 

ADTDFP3 

4 

DIRECTORY FILE 

LEVEL 

3 

POINTER 


Values Defined in ADTDFP3 

14 ADTMFDA ADDRESS OF MFD 

10 ADTMFDN NUMBER OF DOUBLEWORDS IN MFD 

1C ADTHBCT 4 FST HYPERBLOCK COUNT 

20 ADTFSTC 4 NUMBER OF FST ENTRIES IN DIRECTORY 

24 ADTCHBA 4 ADDRESS OF CURRENT HYPERBLOCK 

Values Defined in ADTCHBA 

24 OSADTFST ADDRESS FIRST O/S FST 

28 ADTCFST 4 DISPLACEMENT OF CURRENT FST ENTRY 

Values Defined in ADTCFST 

28 OSADTVTB ADDRESS OF UPPER O/S VTOC 

| 2C ADT1ST 4 FIRST EMPTY RECORD 

| 30 ADTBKCYL 4 BLOCKS PER CYLINDER ON EDF DISK 

Values Defined in ADTBKCYL 
| 39 OSADTDSK O/S DISK ADDRESS 

34 OSADTSV1 4 O/S SAVE AREA 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

38 

ADTLEFT 

4 


NUMBER OF RECORDS LEFT 

3C 

ADTLAST 

4 


INDICATOR FOR LAST RECORD 

40 


4 


RESERVED 

44 

ADTM 

1 

A*1 

MODE LETTER (A,B,C,...,X/ 

45 

ADTMX 

1 

A*2 

EXTENSION-OF-MODE LETTER 

46 

ADTFLG1 

1 

AX3 

FLAG BYTE 1 


Values Defined in ADTFLG1 


80 ADTFSF 
40 ADTFRO 
20 ADTFRW 
10 ADTFFSTF 
08 ADTFFSTV 
04 ADTFQQF 
02 ADTROX 
01 ADTFMIN 


ADT BLOCK IN FREE STORAGE 
CMS READ-ONLY DISK (ATTACH 8 READY) 
CMS READ-WRITE DISK (ATTACH 8 READY) 
1ST FST HYPBLK IS IN FREE STORAGE 
FST HYPBLKS ARE OF VARYING LENGTH 
200-BYTE QQMSK IS IN FREE STORAGE 
THIS DISK HAS READ ONLY EXTENSION(S) 
ADT BLOCK IS MINIMUM SIZE 


47 ADTFLG2 1 A*4 FLAG BYTE 2 


Values Defined in ADTFLG2 


F8 ADTFALUF 
80 ADTFMFD 
40 ADTFALNM 
20 ADTFALTY 
18 ADTFALMD 
10 ADTFMDRO 
04 ADTFROS 
02 ADTPSTM 
01 ADTFDOS 


ALL UFD IS IN CORE 
MFD IS IN CORE 
ALL FILENAMES ARE IN CORE 
ALL FILETYPES ARE IN CORE 
ALL MODES (0-5) ARE IN CORE 
MODES 1-5 ARE IN CORE 
INDICATES THIS IS AN OS DISK 
ADT PSTAT CHAIN MODIFIED 
INDICATES THIS IS A DOS DISK 


48 ADTFLG3 1 A*5 FLAG BYTE 3 


Values Defined in ADTFLG3 


80 ADTFUPD1 
40 ADTFXCHN 
20 ADTFRWOS 
10 ADTFSORT 
08 ADTFORCE 
04 ADTFNOAB 


1ST HALF OF UPDISK CALLED 

EXTRA CHAIN LINK(S) NEED TO BE RETURNED 

READ-WRITE OS OR DOS DISK 

ALL FST HYPERBLOCKS AND FST ENTRIES SORTED 

CMS/DOS/OS DISK FORCED READ-ONLY 

FOR DMSAUD - DON'T ABEND IF DISK ERROR 


49 ADTFLG4 


1 AX6 FLAG BYTE 4 


Values Defined in ADTFLG4 


80 

40 

20 

01 

ADTEDF 

ADTEDFAE 

ADTADDED 

ADTSFSHR 


ENHANCED-DISK-FORMAT DISK 

EDF ACCESS ERASE DONE 

ADT ADDED TO ADT CHAIN BY ADTLKP 
SAVED STORAGE ACCESS 

4A 

ADTFTYP 

1 A*7 

FILE TYPE FLAG BYTE 

4B 


1 

RESERVED 

4C 

ADTDISKC 

4 

DISK CONSTANTS TABLE IN DMSDIP 

4C 

ADTFBABF 


FBA BLOCK TO CMS BLOCK FACTOR 
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ADTSECT 


< 


< 


i 


i 


( 


DISP NAME LEN KEY DESCRIPTION 

50 ADTSECTR 4 SECTOR NUMBER TABLE IN DMSDIP 

Values Defined in ADTDIOB 

50 ADTFBALB LAST FBA BLOCK OF THE MINIDISK 

58 ADT2ND 0 

58 ADTMSK 4 800-BYTE CPQMSK) BIT MASK ADDRESS OR ALLOCATION 

MAP DATA HBLK CHAIN 

5C ADTAMP1 4 200-BYTE (PQQMSK) BIT-MASK ADDRESS 

60 ADTAMP2 4 ALLOCATION MAP LEVEL 2 POINTER 

64 ADTAMP3 4 ALLOCATION MAP LEVEL 3 POINTER 

68 ADTDAMAP 4 DEALLOCATION MAP HBLK CHAIN 

Values Defined in ADTDAMAP 

5C ADTQQM 200-BYTECPQQMSK) 

60 ADTPQM1 NUMBER OF NON-MFD MASK BYTES 

64 ADTPQM2 NUMBER OF BIT MASK BYTES 

68 ADTPQM3 NUMBER OF DWORDS IN PQMSK 

6C ADTLHBA 4 POINTER TO LAST FST HYPER-BLOCK 

70 ADTLFST 4 DISPLACEMENT OF LAST FST IN LAST HYPER-BLOCK 

74 ADTANACW 4 ALTERNATE NUMBER OF ACTIVE WRITE FILES 

Values Defined in ADTANACW 

76 ADTNACW NUMBER OF ACTIVE WRITE FILES 

78 ADTARES 4 ALTERNATE RESERVE-COUNT 

Values Defined in ADTARES 

74 ADTRES RESERVE-COUNT (RESRVCNT) 

7C ADTXNREC 4 NUMBER DOUBLEWORDS OF EXTRA CHAIN LINK RECORDS 

80 ADTXAREC 4 ADDRESS OF BLOCK OF EXTRA CHAIN LINK RECORDS 

84 ADTCHMAP 4 CHANGE MAP HBLK CHAIN 

88 ADTAHTAB 4 POINTER TO HYPMAP/HASH TABLE 

MAPPING OF VOLUME TABLE 


90 

ADTIDENT 

4 

VOLUME START / LABEL IDENTIFIER 

94 

ADTID 

6 

VOLUME START / VOLUME IDENTIFIER 

9A 

ADTVER 

2 

VERSION LEVEL 

9C 

ADTDBSIZ 

4 

DISK BLOCK SIZE 

AO 

ADTDOP 

4 

DISK ORIGIN POINTER 

A4 

ADTCYL 

4 

NUMBER OF FORMATTED CYLINDERS ON DISK 

A8 

ADTMCYL 

4 

MAXIMUM NUMBER FORMATTED CYLINDERS ON DISK 

AC 

ADTNUM 

4 

DISK SIZE IN BLOCKS 

BO 

ADTUSED 

4 

NUMBER OF DISK BLOCKS IN USE 

LY24- 
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DISP NAME JLEN KEY DESCRIPTION 


B4 

ADTFSTSZ 

4 

SIZE OF FST 

B8 

ADTNFST 

4 

NUMBER OF FST f S PER BLOCK 

BC 

ADTDCRED 

6 

DISK CREATION DATE (YYMMDDHHMMSS) 

C2 


2 

RESERVED 

C4 

ADTOFFST 

4 

DISK OFFSET WHEN RESERVED 

C8 

ADTAMNB 

4 

ALLOC MAP BLOCK WITH NEXT HOLE 

CC 

ADTAMND 

4 

DISP INTO HBLK DATA OF NEXT HOLE 

DO 

ADTAMUP 

4 

DISP INTO USER PART OF ALLOC MAP 

D4 


4 

RESERVED 

D8 

ADTSFNAM 

8 

NAME OF SHARED SEGMENT 

50 

ADTLABSZ 


LENGTH OF THE LABEL PORTION 

MAPPING OF OS FIELDS IN 

VOLUME LABEL 

9B 

58 

OB 

E0 

1C 

320 

DA 

OSADTVTA 

ADTLBM 

ABTLDM 

ADTLB 

ADTLD 

ADTRL 

ADTMXBML 


VTOC ADDRESS OF 0/S PACK 

LENGTH OF MINIMUM ADT BLOCK IN BYTES 

LENGTH OF MINIMUM ADT BLOCK IN DOUBLE WORDS 
LENGTH OF FULL ADT BLOCK IN BYTES 

LENGTH OF FULL ADT BLOCK IN DOUBLE WORDS 
LOGICAL RECORD LENGTH 

MAXIMUM BIT MAP LENGTH IN NUMBER OF RECORDS 
FOR 3330 

NUCON 

DEVICE TABLE OFFSETS 

4 

DTAS 

4 

SYMBOLIC DEVICE NAME 

3 

DTADT 

1 

DEVICE TYPE BYTE 

2 

DTADC 

1 

DEVICE CLASS 

0 

DTAD 

2 

DEVICE NUMBER 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ADTADDED 

0049 

20 

ADTCHMAP 

0084 


ADTFALNM 

0047 

40 

ADTFMFD 

0047 

80 

ADTAHTAB 

0088 


ADTCYL 

00A4 


ADTFAL.TY 

0047 

20 

ADTFMIN 

0046 

01 

1 ADTAMNB 

00C8 


ADTDAMAP 

0068 


ADTFALUF 

0047 

F8 

ADTFNOAB 

0048 

04 

| ADTAMND 

OOCC 


ADTDBSIZ 

009C 


ADTFBABF 

004C 

4C 

ADTFORCE 

0048 

08 

ADTAMP1 

005C 


ADTDCRED 

OOBC 


ADTFBALB 

0050 

50 

ADTFQQF 

0046 

04 

ADTAMP2 

0060 


ADTDFP1 

0010 


ADTFDA 

oooc 


ADTFRO 

0046 

40 

ADTAMP3 

0064 


ADTDFP2 

0014 


ADTFDOS 

0047 

01 

ADTFROS 

0047 

04 

| ADTAMUP 

00D0 


ADTDFP3 

0018 


ADTFFSTF 

0046 

10 

ADTFRW 

0046 

20 

ADTANACW 

0074 


ADTDISKC 

004C 


ADTFFSTV 

0046 

08 

ADTFRWOS 

0048 

20 

ADTARES 

0078 


ADTDOP 

00A0 


ADTFLG1 

0046 

• • 

ADTFSF 

0046 

80 

| ADTBKCYL 

0030 


ADTDTA 

0008 


ADTFLG2 

0047 

.. i 

I ADTSFSHR 

0049 

01 

ADTBWPTR 

0004 


ADTEDF 

0049 

80 

ADTFLG3 

0048 

* # 

ADTFSORT 

0048 

10 

ADTCFST 

0028 


ADTEDFAE 

0049 

40 

ADTFLG4 

0049 

* 9 

ADTFSTC 

0020 

« • 

ADTCHBA 

0024 


ADTFALMD 

0047 

18 

ADTFMDRO 

0047 

10 

ADTFSTSZ 

00B4 
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ADTSECT 


CROSS REFERENCE (Name Disn Value) 


ADTFTYP 

004A 

# # 

ADTLFST 

0070 

# 9 

ADTPQM1 

0060 

60 

ADTXAREC 

0080 

9 # 

ADTFUPD1 

0048 

80 

ADTLHBA 

006C 

# # 

ADTPQM2 

0064 

64 

ADTXNREC 

007C 

# # 

ADTFXCHN 

0048 

40 

ADTM 

0044 

# # 

ADTPQM3 

0068 

68 

ADT1ST 

002C 


ADTHBCT 

001C 

# # 

ADTMCYL 

00A8 

# # 

ADTPSTM 

0047 

02 

ADT2ND 

0058 


ADTID 

0094 

# # 

ADTMFDA 

0018 

14 

ADTPTR 

0000 

, , 

DTAD 

• • • • 

00 

ADTIDENT 

0090 

9 # 

ADTMFDN 

# » • • 

10 

ADTQQM 

0068 

5C 

DTADC 

• • • • 

02 

ADTLABSZ 

• • • • 

50 

ADTMSK 

0058 


ADTRES 

0078 

7A 

DTADT 

. • . • 

03 

ADTLAST 

003C 

9 # 

ADTMX 

0045 

# # 

ADTRL 



DTAS 

. • • • 

04 

ADTLB 

• • • • 

E0 

ADTMXBML 

• • • • 

0A 

ADTROX 

0046 

02 

| OSADTDSK 

0030 

30 

ADTLBM 

• • • • 

58 

ADTNACN 

0074 

76 

ADTSECTR 

0050 

# # 

OSADTFST 

0024 

24 

ADTLD 

• • « • 

1C 

ADTNFST 

00B8 

, , 

I ADTSFNAM 

00D8 

# # 

OSADTSV1 

0034 

• • 

ADTLDM 

• • • • 

0B 

ADTNUM 

00AC 


ADTUSED 

00B0 

# m 

OSADTVTA 

.... 

9B 

ADTLEFT 

0038 

, , 

ADTOFFST 

00C4 

. . 

ADTVER 

009A 


OSADTVTB 

0028 

28 
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AFTSECT: ACTIVE FILE TABLE 

AFTSECT is used to describe a file currently open for a read or write. The AFT is 
created when a file is opened. Space for up to five AFTs is available in DMSNUC; 
any other must reside in free storage. AFTSECT is invoked via the AFT macro. 

0 
8 

10 
18 


18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 

80 

88 

90 

98 

A0 

A8 

B0 

B8 
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AFTSECT 


AFTFOP 

AFTADBC 

AFTAIC 

A*6 | A*7 | AFTADATI 

AFTADATI Ccont.) 

//////////////////// 


SIZE 

LENGTH OF AFT BLOCK IN BYTES (AFTLB ) D8 
LENGTH OF AFT BLOCK IN DOUBLEWORDS (AFTLD ) IB 

LENGTH OF AN EDF FST (AFTL2 ) 40 
LENGTH OF AFT BLOCK (AFTL ) 28 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

AFTPTR 

4 

POINTER TO NEXT AFT BLK IN CHAIN 

Values Defined in 

AFTPTR 

40 

AFTFSF 


AFTPTR BIT INDICATES IN FREE STORAGE 

4 

AFTADT 

4 

POINTER TO ACTIVE DISK TABLE 

8 

AFTCLD 

2 

DISK ADDR OF CURRENT CHAIN LINK 

8 

AFTCACHE 

4 

ADDRESS OF CACHE AREA 

A 

AFTCLN 

2 

NUMBER OF CURRENT CHAIN LINK 

C 

AFTCLA 

4 

CORE ADDRESS OF CHAIN LINK BUFR 

10 

AFTDBD 

2 

DISK ADDRESS OF CURRENT DATA BLK 

12 

AFTDBN 

2 

NUMBER OF CURRENT DATA BLOCK 

14 

AFTDBA 

4 

CORE ADDRESS OF CURRENT DATA BLK 

18 

AFTCLB 

80 

CHAIN LINK BUFR FROM 1ST CH.LINK 

18 

AFTUFP5 

4 

5TH LEVEL POINTER HBLK CHAIN 

1C 

AFTUFP4 

4 

4TH LEVEL POINTER HBLK CHAIN 

20 

AFTUFP3 

4 

3RD LEVEL POINTER HBLK CHAIN 

24 

AFTUFP2 

4 

2ND LEVEL POINTER HBLK CHAIN 

28 

AFTUFP1 

4 

1ST LEVEL POINTER HBLK CHAIN 

2C 

AFTRDBLK 

4 

DATA BLOCK CHAIN 

30 

AFTRDID 

4 

ITEM DISPLACEMENT IN BLOCK 

34 

AFTLSTRC 

4 

LAST RECORD NUMBER PROCESSED 

38 

AFTARP 

4 

ALTERNATE READ POINTER 

3C 

AFTAWP 

4 

ALTERNATE WRITE POINTER 

40 

AFTPHYP 

4 

A(HBLK HOLDING STATIC FST) 

44 

AFTSVBLK 

8 

SAVE DATA BLOCK DISP AND NUMBER 

4C 

AFTSVFP4 

8 

SAVE PTR4 BLOCK DISP AND NUMBER 
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ESP 

NAME 

LEN 

KEY 

DESCRIPTION 


54 

AFTSVFP3 

8 


SAVE 

PTR3 

BLOCK DISP AND 

NUMBER 

5C 

AFTSVFP2 

8 


SAVE 

PTR2 

BLOCK DISP AND 

NUMBER 

64 

AFTSVFP1 

8 


SAVE 

PTR1 

BLOCK DISP AND 

NUMBER 

6C 

AFTUBFAD 

4 


SAVE 

USER 

BUFFER ADDRESS 


70 

AFTUBFLG 

4 


SAVE 

USER 

BUFFER LENGTH 


74 

AFTMXBLK 

4 


MAX NUMBER OF ENTRIES IN 

A PTR BL 

78 

AFTBLKWD 

4 


SAVE 

USER 

BUFF DISP BLKWR 

79 

AFTBFORM 

1 


SAVE 

REAL 

FORMAT DURING BLOCK WR. 

7A 

AFTBPRCT 

2 


SAVE 

PREV. 

RESIDUAL CT FOR V-FORM 

7C 

AFTEBLIN 

4 


CURRENT ITEM NUMBER 


80 

AFTEBDSP 

4 


CURRENT ITEM DISPLACEMENT 


84 

AFTFLG 

1 

A*1 

FLAG 

BYTE 




Values Defined in AFTFLG 


80 AFTUSED 
20 AFTICF 
10 AFTFBA 
08 AFTDBF 
04 AFTWRT 
02 AFTRD 
01 AFTFULD 


ACTIVE FILE TABLE BLOCK IN USE 
FIRST CHAIN LINK IN CORE FLAG 
FULL BUFFER ASSIGNED 
DATA BLOCK IN CORE FLAG 
ACTIVE WRITE 
ACTIVE READ 

FULL-DISK SPECIAL CASE 


85 

AFTPFST 

3 

POINTER TO (STATIC) FST-ENTRY 

88 

AFTIN 

2 

CURRENT ITEM NUMBER 

8A 

AFTID 

2 

DISP.OF CURRENT ITEM IN DATA BLK 

8C 

AFTFCLA 

4 

CORE ADDRESS OF FIRST CHAIN LINK 

90 

AFTFCLX 

2 

DISK ADDRESS OF SWAPPED FCL 

92 

AFTCLDX 

2 

DISK ADDRESS OF SWAPPED CHAIN LINK 

94 

AFTFLG2 

1 

A*2 SECOND FLAG-BYTE 

Values Defined 

in AFTFLG2 

80 

AFTNEW 


BRAND NEW FILE 

80 

AFTOVLAP 


LENGTH ACROSS TWO DATA BLOCKS 


40 AFTOLDCL 
20 AFTCLX 
10 AFTREAD 
08 AFTVLGTH 
04 AFTVLREC 
02 AFTERR8 
01 SAMELEN 


CURRENT CHAIN LINK EXISTED PREVIOUSLY 
ALTERNATE CHAIN-LINK ASSIGNED/IMPLIED 
FILE IS BEING READ. 

LENGTH MUST BE HANDLED FOR V-FORM 
WRITING THE LAST V-FORMAT RECORD 
ERROR 8 J USER BUFFER LENGTH TOO 
FORCE SAME LENGTH UPDATE 


95 AFTFLG3 1 A*3 THIRD FLAG BYTE 


Values Defined in AFTFLG3 


80 AFTNCACH 


NON-CACHEINGMODE FOR NON-SEQUENTIAL I/O 


96 AFTOCLDX 2 OLD VALUE CIF ANY) OF AFTCLDX 
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DISP NAME LEN KEY DESCRIPTION 


98 AFTFST 8 COPY OF FST BLOCK IMBEDDED IN AFT BLOCK 

FILE STATUS TABLE (FILE DIRECTORY) BLOCK 


98 

AFTN 

8 


FILE NAME 

A0 

AFTT 

8 


FILE TYPE 

A8 

AFTD 

4 


DATE/TIME LAST WRITTEN 

AC 

AFTWP 

2 


WRITE POINTER (ITEM ft) 

AE 

AFTRP 

2 


READ POINTER (ITEM ft) 

B0 

AFTM 

2 


FILE MODE 

B2 

AFTIC 

2 


ITEM COUNT 

B4 

AFTFCL 

2 


FIRST CHAIN LINK 

B6 

AFTFV 

1 

A*4 

FIXED(F)/VARIABLE(V) FLAG 

B7 

AFTFB 

1 

A*5 

FLAG BYTE (IF USED) 


Values Defined in AFTFB 


(applicable only to "STATEFST” copy of FST-ENTRY 
after successful "STATE” or "STATEW” call.) 


00 AFTFRO 
CO AFTFRWX 
80 AFTFRW 
40 AFTFROX 
07 AFTFACT 
04 AFTFAR 
02 AFTFAW 
01 AFTFAP 


READ-ONLY DISK 

READ-ONLY EXTENSION OF READ-ONLY DISK 
READ/WRITE DISK 

READ-ONLY EXTENSION OF READ/WRITE DISK 
FILE "ACTIVE” - ONE OF THE FOLLOWING: 
FILE ACTIVE FOR READING 
FILE ACTIVE FOR WRITING 
FILE ACTIVE FROM A "POINT” 


Applicable to FSCBFLG in plist 


40 

AFTITAV 



ITEM AVAILABLE 

20 

AFTEPL 



EXTENDED PLIST 

01 

AFTRECAV 



PREVIOUS RECORD NULL 

B8 

AFTIL 



(MAXIMUM) ITEM LENGTH 

BC 

AFTDBC 

2 


NUMBER OF DATA BLOCKS 

BE 

AFTYR 

2 


YEAR 

FST EDF EXTENSION 



CO 

AFTFOP 

4 


ALT. FILE ORIGIN POINTER 

C4 

AFTADBC 

4 


ALT. NUMBER OF DATA BLOCKS 

C8 

AFTAIC 

4 


ALT. ITEM COUNT 

CC 

AFTNLVL 

1 

A*6 

NUMBER OF POINTER BLOCK LEVELS 

CD 

AFTPTRSZ 

1 

A*7 

LENGTH OF A POINTER ELEMENT 

CE 

AFTADATI 

6 


ALT. DATE/TIME(YY MM DD HH MM 

FST HYPER-BLOCK 

PARAMETERS 


AFTBKWD 800 BACKWARD PTR (TO PREVIOUS HYPERBLK IN CORE) 

AFTFWDP 804 FORWARD PTR (TO NEXT HYPERBLOCK IN CORE) 


AFTSECT 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AFTADATI 

OOCE 


AFTEPL 

00B7 

20 

AFTICF 

0084 

20 

AFTRDID 

0030 


AFTADBC 

00C4 


AFTERR8 

0094 

02 

AFTID 

008A 

9 # 

AFTREAD 

0094 

10 

AFTADT 

0004 


AFTFACT 

00B7 

07 

AFTIL 

00B8 

# # 

AFTRECAV 

00B7 

01 

AFTAIC 

00C8 


AFTFAP 

00B7 

01 

AFTIN 

0088 

• • 

AFTRP 

00AE 


AFTARP 

0038 


AFTFAR 

00B7 

04 

AFTITAV 

00B7 

40 

AFTSVBLK 

0044 


AFTAWP 

003C 


AFTFAW 

00B7 

02 

AFTL 

• • • • 

28 

AFTSVFP1 

0064 


AFTBFORM 

0079 


AFTFB 

00B7 


AFTLB 

• • • • 

D8 

AFTSVFP2 

005C 


AFTBKHD 

OOCE 

XX 

AFTFBA 

0084 

10 

AFTLD 

• • • • 

BD 

AFTSVFP3 

0054 


AFTBLKWD 

0078 


AFTFCL 

00B4 


AFTLSTRC 

0034 


AFTSVFP4 

004C 


AFTBPRCT 

007A 


AFTFCLA 

008C 


AFTL2 

• • # • 

40 

AFTT 

00A0 


AFTCACHE 

0008 

64 

AFTFCLX 

0090 


AFTM 

00B0 

, , 

AFTUBFAD 

006C 


AFTCLA 

oooc 


AFTFLG 

0084 


AFTMXBLK 

0074 


AFTUBFLG 

0070 


AFTCLB 

0018 


AFTFLG2 

0094 


AFTN 

0098 

, . 

AFTUFP1 

0028 


AFTCLD 

0008 


AFTFOP 

ooco 


AFTNEW 

0094 

80 

AFTUFP2 

0024 


AFTCLDX 

0092 


AFTFRO 

00B7 

66 

AFTNLVL 

oocc 

t # 

AFTUFP3 

0020 


AFTCLN 

000A 


AFTFROX 

00B7 

40 

AFTOCLDX 

0096 

m # 

AFTUFP4 

001C 


AFTCLX 

0094 

20 

AFTFRW 

00B7 

80 

AFTOLDCL 

0094 

40 

AFTUFP5 

0018 


AFTD 

00A8 


AFTFRWX 

O0B7 

CO 

AFTOVLAP 

0094 

80 

AFTUSED 

0084 

80 

AFTDBA 

0014 


AFTFSF 

0000 

40 

AFTPFST 

0085 


AFTVLGTH 

0094 

08 

AFTDBC 

00BC 


AFTFST 

0098 

. . 

AFTPHYP 

0040 

# # 

AFTVLREC 

0094 

04 

AFTDBD 

0010 


AFTFULD 

0084 

01 

AFTPTR 

0000 

• • 

AFTNP 

OOAC 

# # 

AFTDBF 

0084 

08 

AFTFV 

00B6 

, # 

AFTPTRSZ 

00CD 

# # 

AFTHRT 

0084 

04 

AFTDBN 

0012 

m m 

AFTFWDP 

OOCE 

XX 

AFTRD 

0084 

02 

AFTYR 

OOBE 

# m 

AFTEBDSP 

0080 

# , 

AFTIC 

00B2 

, , 

AFTRDBLK 

002C 

. . 

SAMELEN 

0094 

01 


AFTEBLIN 007C .. 


LY24-5221 (c) Copyright IBM Corp. 1986 

16 CMS Data Areas and Control Block Logic 







Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


ANCHSECT 


ANCHSECT: ANCHOR TABLE 

ANCHSECT defines the VSE anchor table. This DSECT is used by DMSDGS when a CDLOAD 
(SVC 65) is issued? and the specified phase is not found in either the CMSVSAM or 
CMSAMS segment. In this case? the specified phase is loaded either from a CMS 
DOSLIB or a VSE core image library? and the name? load point? entry point and the 
length in bytes? of the phase are saved in an available slot in the anchor table. 
ANCHSECT is invoked by the ANCHTAB macro. 


ANCHENDA 

///////////////////// 

ANCHCBS 

ANCHOAL 

| ANCHPHNM | 

ANCHLDPT 

ANCHENTP 

A*1 | ANCHPHLN 



SIZE 

LENGTH OF ONE ANCHOR-TABLE ENTRY (ANCHLENG) 14 


DEFAULT SIZE OF 

ANCHOR 

TABLE IN BYTES (ANCHSIZ ) 1024 

HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

BEGINNING OF AN 

ANCHOR 

TABLE 

0 

ANCHENDA 

4 

END ADDRESS OF ANCHOR TABLE 

4 


4 

RESERVED 

8 

ANCHCBS 

4 

POINTER TO VSAM "AMCB" TABLE 

C 

ANCHOAL 

4 

POINTER TO VSAM "OAL” (OPEN ACB) TABLE 

FOLLOWED BY ONE 

OR MORE 

ANCHOR-TABLE ENTRIES OF THE FOLLOWING FORMAT: 

10 

ANCHPHNM 

8 

PHASE NAME 

18 

ANCHLDPT 

4 

LOAD POINT 

1C 

ANCHENTP 

4 

ENTRY POINT 

20 

ANCHSTSW 

1 A*1 

STATUS SWITCH 

Values Defined in ANCHSTSW 

7 F 

ANCHINST 


PHASE IS ALREADY IN STORAGE 

FF 

ANCHRPJL 


REQUESTED PHASE JUST LOADED BY 

ANOTHER TASK (ONLY IF AP=YES) 

00 

ANCHMLOD 


PHASE MUST BE LOADED 

21 

ANCHPHLN 

3 

LENGTH OF PHASE IN BYTES 
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CROSS REFERENCE (Name Disp Value) 



This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ANCHCBS 0008 . . 
ANCHENDA 0000 .. 
ANCHENTP 001C .. 
ANCHINST 0020 7F 


ANCHLDPT 0018 .. 
ANCHLENG .... 14 
ANCHMLOD 0020 00 


ANCHOAL 000C .. 
ANCHPHLN 0021 .. 
ANCHPHNM 0010 .. 


ANCHRPJL 0020 FF 
ANCHSIZ .... 
ANCHSTSN 0020 .. 
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AVRADR 


AVRADR: VOLUME AND DEVICE CHARACTERISTICS 

AVRADR describes the characteristics of volumes and devices in response to a VSE SVC 
99 request (GETVCE). AVRADR is invoked by AVRADR copy. 


0 

AVRPUB 

AVRVOLID 

8 


A*1 | A*2 

AVRVTOC 

AVRVHH 

10 

A*3 | /// 

AVRLNO 

A*4 | A*5 

DCTUCBC 

18 


DCTPCYL 

DCTACYL 

DCTTCYL 

20 

DCTBTRK 

DCTTFIX | 

28 

DCTMAXR 

DCTROH 

A*6 

AX7 A*8 

30 

A*9 | /// 



SIZE 

DCTADR LENGTH IN BYTES (DCTLEN ) IE 
AVRADR LENGTH IN BYTES (AVRLEN ) 32 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 AVRVOLC VOLUME CHARACTERISTICS 

0 AVRPUB 4 ADDR OF PUB 

4 AVRVOLID 6 VOLUME IDENTIFIER 

A AVRFLAG 1 A*1 MASK OF INVALID FIELDS 

Values Defined in AVRFLAG 

02 AVRNLNO AVRLNO INVALID 

01 AVRNVOL AVRVOLID AND AVRVTOC INVALID 

B AVRTYPE 1 A*2 DEVICE CHARACTERISTICS 


Values Defined in AVRTYPE 


01 AVRFBA 
02 AVRCKD 
03 AVRRPS 


FB/E DEVICE 

CKD DEVICE 

DEVICE SUPPORTS RPS 


C AVRVTOC 6 


VTOC POINTER 


C AVRVCC 2 


CKD CYL NO. 


E AVRVHH 2 


CKD TRACK NO. 


10 AVRVR 1 AX3 CKD RECORD NO. 


11 


RESERVED 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

c 

AVRVCI 

1 

FB/E BLKS/CI IN VTOC 

D 

AVRVNUM 

4 

FB/E BLOCKNO 

12 

AVRLNO 

2 

LOGICAL UNIT NUMBER 

14 

AVRDEVC 


DEVICE CHARACTERISTICS 

14 

DCTADR 

A*4 


14 

DCTPUBC 

1 

PUB CODE 

15 

DCTDTFC 

1 A*5 


16 

DCTUCBC 

4 

VSAM CATALOG CODE 

1A 

DCTPCYL 

2 

PRIMARY CYLS/BLKS PER VOLUME 

1C 

DCTACYL 

2 

ALTERNATE AREA CYLS/BLKS 

IE 

DCTTCYL 

2 

TRKS/CYL..CKD 

20 

DCTBTRK 

4 

CKD. BYTES PER TRK 

24 

DCTTFIX 

4 

CYL/BLKS UNDER FIXED ACCESS 

28 

DCTMAXR 

2 

MAX PHYS RECORD SIZE 

2A 

DCTROH 

3 

DEVICE O/HEAD 

2D 

DCTFL3 

1 A*6 

DEVICE TOLERANCE FLAG 

2E 

DCTTFAC 

2 

TOLERANCE FACTOR 

2E 

DCTBYSEG 

1 AX7 

BYTES / SEGMENT 

2F 


1 AX8 

RESERVED 

30 

DCTRPSC 

1 A*9 

RPS DEVICE TYPE CODE 

31 


1 

RESERVED 


CROSS REFERENCE (Name Disc Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AVRCKD 

000B 

02 

AVRRPS 

000B 

03 

AVRDEVC 

0014 

# # 

AVRTYPE 

000B 


AVRFBA 

000B 

01 

AVRVCC 

oooc 


AVRFLAG 

000A 

• • 

AVRVCI 

oooc 


AVRL‘ I 

• • • • 

30 

AVRVHH 

000E 


AVRLNO 

0012 

# # 

AVRVNUM 

000D 


AVRNLNQ 

000A 

02 

AVRVOLC 

0000 


AVRNVOL 

000A 

01 

AVRVOLID 

0004 


AVRPUB 

0000 

• . 

AVRVR 

0010 



AVRVT0C 

OOOC 


DCTPCYL 

001A 


DCTACYL 

001C 


DCTPUBC 

0014 


DCTADR 

0014 


DCTROH 

002A 


DCTBTRK 

0020 


DCTRPSC 

0030 


DCTBYSEG 

002E 


DCTTCYL 

001E 


DCTDTFC 

0015 


DCTTFAC 

002E 


DCTFLG 

002D 


DCTTFIX 

0024 


DCTLEN 

DCTMAXR 

0028 

ic 

DCTUCBC 

0016 
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BATLSECT 


BATLSECT: CMS BATCH USER JOB LIMITS 

BATLSECT describes the fields in the user job limits table for CMS batch jobs. 
BATLSECT is invoked by the BATLIMIT macro. 


BATCPUL 

BATCPUC 

BATPRTL 

BATPRTC 

BATPUNL 

BATPUNC 



HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 




0 

BATCPUL 

2 

VIRT.CPU LIMIT (SEC.) 

- CAN 

BE 

RESET 

2 

BATCPUC 

2 

CURRENT CPU COUNT 

- DO 

NOT 

RESET 

4 

BATPRTL 

2 

NO. PRINTED LINES LIMIT 

- CAN 

BE 

RESET 

6 

BATPRTC 

2 

CURRENT LINE COUNT 

- DO 

NOT 

RESET 

8 

BATPUNL 

2 

NO. PUNCHED CARDS LIMIT 

- CAN 

BE 

RESET 

A 

BATPUNC 

2 

CURRENT CARD COUNT 

- DO 

NOT 

RESET 

CROSS 

REFERENCE 

(Name 

Disp Value) 





This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


BATCPUC 

0002 .. 

BATPRTC 0006 .. 

BATPRTL 0004 . . 

BATPUNC 

000A . 

BATCPUL 

0000 .. 



BATPUNL 

0008 . 
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BBOX: BOUNDARY BOX 

BBOX contains the beginning addresses of the VSE partitions when CMS/DOS is active; 
one for each entry. BBOX is invoked by the BBOX macro. 



HEX 

DISP NAME LEN KEY DESCRIPTION 

0 PBEGIN 4 PARTN START ADDR 

4 PENDLOG 4 PARTN LOGICAL END 

8 PGEND 4 PARTN PHYSICAL END 

C PFIXLMT 4 PFIX LIMIT ZERO FOR CMS 

10 PFIXCNT 4 PFIX COUNT ZERO FOR CMS 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PBEGIN 0000 .. PFIXCNT 0010 .. PFIXLMT 000C .. 

PENDLOG 0004 .. PGEND 0008 .. 
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BGCOM: VSE PARTITION COMMUNICATION REGION 

BGCOM simulates the DOS/VS Partition Communication Region (BGCOM). 
in NUCON points to the BGCOM block. BGCOM is invoked by the BGCOM 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 

80 

88 

90 

98 

A0 

A8 

B0 

B8 

CO 


JOBDATE 


i 


///////////////////// 

COMUSCR (cont.) 


COMUSCR 


i 


UPSI 


COMNAME 


PPEND 


HIPHAS 


HIPROG 


LABLEN 


i 


PIK 


3 


EOCADR 


B*1 LTACT 


SOB1 S0B2 


3 


35 


JCSW1 JCSW2 


JCSW3 JCSW4 


///////// 


FOCLPT 


PUBPT 


FAVPT 


JIBPT 


///////// 


i 


FICLPT 


NICLPT 


LUBPT 


B*2 


MMDD 




MMDD (cont 


YYDDD 


i 


LIOCSCOM 


PIBPT 


i 


CHKPTID 


JOBZON 


DIBPT 


BX3 


/// 


IJBHCFAD 


35 


35 


cont. /// 


PWTIMS 


///////// 


LTK 


SYSPAR 


JAPART 


TODCOM 


PIB2PTR 


PDTABB 


LABELPTR 


BGCOMPT 


B*4 


i 


B*5 


///////////////////// 


B*6 B*7 


B*8 


B*9 


B*9 (PROCNAM) 


BX10 


POVNAM 


BX11 


PONPCB 

LUBEXT 


B*12 


BX13 


///////// 


3 


JCSW5 


JCSW6 


BX14 BX15 


IJBJPL 
IJBPHLST 

IJBJOBLG (cont.) 


IJBAFCB 

IJBJOBLG 


BGCOM 


The ABGCOM field 
macro. 
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BGCOM 
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HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

JOBDATE 

8 

JOB DATE 

8 


4 

RESERVED 

C 

COMUSCR 

11 

USER SCRATCH AREA 

17 

UPSI 

1 

UPSI BYTE 

18 

COMNAME 

8 

JOB NAME 


20 

PPEND 

4 

HIGHEST STORAGE ADDRESS OF PARTITION 

24 

HIPHAS 

4 

END ADDRESS OF LAST PHASE LOADED 

28 

HIPROG 

4 

END ADDRESS OF LONGEST PHASE LOADED 

2C 

LABLEN 

2 

LENGTH OF PROBLEM PROGRAM LABEL AREA 

2E 

PIK 

2 

PROGRAM INTERRUPT KEY 

30 

EOCADR 

4 

END OF VIRTUAL STORAGE ADDRESS 

34 

CONFIG 

1 B*1 

MACHINE CONFIGURATION BYTE 

35 

LTACT 

1 

SYSTEM CONFIGURATION BYTE 

36 

S0B1 

1 

STANDARD LANGUAGE TRANSLATOR OPTIONS 

37 

S0B2 

1 

STANDARD SUPERVISOR OPTIONS 

38 

JCSN1 

1 

JOB CONTROL BYTE 

39 

JCSW2 

1 

LINKAGE CONTROL BYTE 

3A 

JCSN3 

1 

NON-STD LANGUAGE TRANSLATOR OPTIONS 

3B 

JCSW4 

1 

JOB DURATION INDICATOR BYTE 

3C 


2 

RESERVED 

3E 

FOCLPT 

2 

ADDRESS OF FOCL 

40 

PUBPT 

2 

ADDRESS OF PUB 

42 

FAVPT 

2 

ADDRESS OF FAVP 

44 

JIBPT 

2 

ADDRESS OF JIB 

46 


2 

RESERVED 

48 

FICLPT 

2 

ADDRESS OF FICL 

4A 

NICLPT 

2 

ADDRESS OF NICL 

4C 

LUBPT 

2 

ADDRESS OF LUB 

4E 

SYSLINE 

1 B*2 

SYSLST LINE COUNT 

4F 

SYSDATE 

9 

SYSTEM DATE 

4F 

MMDD 

4 

MMDD OR DDMM 

53 

YYDDD 

5 

YYDDD PORTION OF DATE 

58 

LIOCSCOM 

2 

LIOCS COMMUNICATION BYTES 
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BGCOM 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

5A 

PIBPT 

2 


ADDRESS OF PIB 

5C 

CHKPTID 

2 


LAST CHECKPOINT NUMBER 

5E 

JOBZON 

2 


JOB ZONE IN MINUTES 

60 

DIBPT 

2 


BACKGROUND DIB POINTER 

62 

DEVFLG1 

1 

B*3 

DEV FLAGS FOR AUTOCLOSE 

63 


1 


RESERVED 

64 

IJBHCFAD 

5 


JOB STATEMENT ON HC FILE 

69 


1 


RESERVED 

6A 

PWTIMS 

2 


KEY OF PROGRAM WITH IT SUPPORT 

6C 


2 


RESERVED 

6 E 

LTK 

2 


LOGICAL TRANSIENT KEY 

70 

SYSPAR 

4 


ADDRESS OF SYSPARM 

74 

JAPART 

4 


ADDRESS OF JOB ACCOUNTING TABLE 

78 

TODCOM 

4 


ADDRESS OF TOD COMMUNICATIONS AREA 

7C 

PIB2PTR 

2 


ADDRESS OF PIB EXTENSION 

7 E 

PDTABB 

2 


ADDRESS OF MICR DTF TABLE 

80 

LABELPTR 

4 


ADDRESS OF LABEL SPACE 

84 

BGCOMPT 

2 


ADDRESS OF BACKGROUND COMREG 

86 

OPTNBYTE 

1 

B*4 

OPTION INDICATOR BYTE 

87 

RMSROPEN 

1 

BX5 

SYSTEM CONFIG BYTE 2 

88 


4 


RESERVED 

8C 

STDOPT 

1 

B*6 

STANDARD JOB CONTROL OPTION BYTE 

8D 

TEMOPT 

1 

B*7 

TEMPORARY JOB CONTROL OPTION BYTE 

8E 

DISKCONF 

1 

B*8 

DISK CONFIGURATION BYTE 

8F 

PROCNAM 

8 

B*9 

PROCEDURE NAME 

97 

PSWTCH 

1 

BX10 

INTERFACE BYTE FOR CATALOG PROCEDURE 

98 

POVNAM 

7 


SAVE AREA FOR STATEMENT NAME 

9F 

INSIZE 

1 

B*ll 

81 BYTE SYSIN INDICATOR 

AO 

POWPCB 

4 


ADDRESS OF PART CTL BLOCK 

A4 

P0WFLG1 

1 

B*12 

POWER/VS FLAG BYTE 1 

A5 

P0WFLG2 

1 

B*13 

PONER/VS FLAG BYTE 2 

A6 


2 


RESERVED 

A8 

LUBEXT 

4 


ADDRESS OF LUB TAB EXT 

AC 

JCSW5 

1 


JOB CTL SWITCH 5 

AD 

JCSW6 

1 


JOB CTL SWITCH 6 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

AE 

STD0PT2 

1 

BX14 

STANDARD OPTIONS 2 

AF 

TEM0PT2 

1 

B*15 

TEMPORARY OPTIONS 2 

B0 

IJBJPL 

4 


ADDRESS OF JPL OF PARTITION 

B4 

IJBAFCB 

4 


SLOT FOR CICS 

B8 

IJBPHLST 

4 


ADDRESS OF FETCH/LOAD TRACE TABLE 

BC 

IJBJOBLG 

8 


ADDRESS OF LAST HC JOBSTMNT 

C4 

COMREND 



END LABEL 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


BGCOMPT 

0084 .. 

I JBJOBLG 

00BC 

# # 

CHKPTID 

005C .. 

IJBJPL 

00B0 


COMNAME 

0018 .. 

IJBPHLST 

00B8 


COMREND 

00C4 .. 

INSIZE 

009F 


COMUSCR 

000C .. 

JAPART 

0074 


CONFIG 

0034 .. 

JCSW1 

0038 


DEVFLG1 

0062 .. 

JCSW2 

0039 


DIBPT 

0060 .. 

JCSW3 

003A 


DISKCONF 

008E .. 

JCSW4 

003B 


EOCADR 

0030 .. 

JCSW5 

00AC 


FAVPT 

0042 .. 

JCSW6 

00AD 


FICLPT 

0048 .. 

JIBPT 

0044 


FOCLPT 

003E .. 

JOBDATE 

0000 


HIPHAS 

0024 .. 

JOBZON 

005E 


HIPROG 

0028 .. 

LABELPTR 

0080 


IJBAFCB 

00B4 .. 

LABLEN 

002C 


IJBHCFAD 

0064 .. 

LIOCSCOM 

0058 



LTACT 0035 .. PROCNAM 008F . 
LTK 006E .. PSNTCH 0097 . 
LUBEXT 00A8 .. PUBPT 0040 . 
LUBPT 004C .. PWTIMS 006A . 
MMDD 004F .. RMSR0PEN 0087 . 
NICLPT 004A .. S0B1 0036 . 
0PNBYT2 0063 .. S0B2 0037 . 
OPTNBYTE 0086 .. STDOPT 008C . 
PDTABB 007E .. STD0PT2 00AE . 
PIBPT 005A .. SYSDATE 004F . 
PIB2PTR 007C .. SYSLINE 004E . 
PIK 002E .. SYSPAR 0070 . 
POVNAM 0098 .. TEMOPT 008D . 
P0HFLG1 00A4 .. TEM0PT2 00AF . 
P0NFLG2 00A5 .. TODCOM 0078 . 
POWPCB 00A0 .. UPSI 0017 . 
PPEND 0020 .. YYDDD 0053 . 
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CMSLEVEL 


CMSLEVEL 

CMSLEVEL maps the contents returned by the QUERY CMSLEVEL CMS command. CMSLEVEL is 
invoked by the CMSLEVEL macro. 

The following picture represents the contents of registers and not of storage. 


QUERY CMSLEVEL LOADS RO WITH THE FOLLOWING: 


R0 = 


RO IS LOADED WITH THE FULLWORD AT USERLVL IN 
NUCON. THIS FIELD IS RESERVED FOR THE USER. 


0 


31 


QUERY CMSLEVEL LOADS R1 WITH THE FOLLOWING: 



RESERVED 

RELEASE 

SERVICE LEVEL 


FOR FUTURE 

NUMBER 


Rl = 

USE 




0 8 16 31 


THE CODE FOR RELEASE IS DEFINED AS: 


Name 

Len 

Description 


VMR6 

00 

VM/370 

RELEASE 

6 

VMBSEP 

01 

VM/BSEP 

RELEASE 

2 

VMSEP 

02 

VM/SEP 

RELEASE 

2 

VMSP1 

03 

VM/SP 

RELEASE 

1 

VMSP2 

04 

VM/SP 

RELEASE 

2 

VMSP3 

05 

VM/SP 

RELEASE 

3 

VMSP4 

06 

VM/SP 

RELEASE 

4 

VMSP5 

07 

VM/SP 

RELEASE 

5 

VMPC 

10 

V M/PC 

VERSION 

1.00 

VMPC 

20 

VM/SP 

VERSION 

2.00 


SERVICE LEVEL is a halfword in binary format. 
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CMSTAXE: TERMINAL ATTENTION EXIT ELEMENT 

CMSTAXE defines the fields used in a Terminal Attention Exit Element (TAXE). The 
TAXE is used mainly by DMSCIT for processing attention interrupts. CMSTAXE is 
invoked via the TSOBLOKS macro. The TAXEADDR field in NUCON points to CMSTAXE. 


0 

TAXESPSW 

TAXEEXIT 

8 

TAXELNK 

TAXEIOL 

10 

TAXETSOF 

TAXERTNA 

18 




TAXEEXTS 


60 


(Variable Length) 


TAXEIOHS 



(Variable Length) | 

88 


TAXETAIE 

90 

///////////////////// 

TAXEUSER 

98 

///////// | /// | 

TAIEIAD 

AO 




TAIERSAV 


(Variable Length) 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

TAXESPSN 

4 

LEFT HALF 

PSW FOR ATTENTION RETURN 

4 

TAXEEXIT 

4 

ATTENTION 

EXIT ADDRESS 

8 

TAXESTAT 

4 

STATUS OF 

EXIT RETURN 

Values Defined in 

TAXESTAT 


80 

TAXEFREQ 


ATTENTION 

EXIT TAKEN 

8 

TAXELNK 

4 

NEXT TAXE 

ON QUEUE 

C 

TAXEIOL 

4 

LEFT HALF 

10 OLD PSN 

10 

TAXETSOF 

4 

TSOFLAGS : 

SAVED HERE 

14 

TAXERTNA 

4 

RETURN ADDRESS 

18 

TAXEEXTS 

0 

ATTENTION 

EXIT RETURN SAVE AREA 
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CMSTAXE 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

60 

TAXEIOWS 

0 

DMSIOW SAVE AREA 

ALSO 

ATTENTION 

EXIT PARAMETER LIST 

88 


4 

RESERVED 

8C 

TAXETAIE 

4 

ADDRESS OF TAIE 

90 


4 

RESERVED 

94 

TAXEDEF 

4 

DEFER INDICATOR 

94 

TAXEUSER 

4 

USER PARAMETER LIST ADDRESS 

ALSO 

TERMINAL ATTENTION 

INTERRUPT ELEMENT (TAIE) 

98 


2 

RESERVED 

9A 


1 

RESERVED 

9B 


1 

RESERVED 

9C 

TAIEIAD 

4 

RIGHT HALF 10 OLD PSW 

A0 

TAIERSAV 

64 

REGISTERS 0-15 INTERRUPTED PROGRAM 


CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


TAIEIAD 009C . 
TAIEMSGL 0098 . 
TAIERSAV 00A0 . 
TAIETGET 009A . 
TAXEDEF 0094 . 


TAXEEXIT 0004 .. 
TAXEEXTS 0018 .. 
TAXEFREQ 0008 80 
TAXEIOL 000C .. 


TAXEIOHS 0060 .. 
TAXELNK 0008 .. 
TAXERTNA 0014 .. 
TAXESPSW 0000 . . 


TAXESTAT 0008 .. 
TAXETAIE 008C .. 
TAXETSOF 0010 .. 
TAXEUSER 0094 . . 
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COMCLIST: COMMUNICATIONS CHECKING LIST 

One of these control blocks is created for each node that is checked for its ability 
to communicate with the programmable operator facility. The programmable operator 
facility uses this block as a listing to verify which nodes have to be checked. 



SIZE 

NODE LIST ENTRY LENGTH IN DOUBLEWORDS (CONCLEND) 03 
NODE LIST ENTRY LENGTH IN BYTES CCOMCLEN) 18 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 COMCNEXT 4 ADDRESS OF NEXT COMCLIST BLOCK 

4 COMCWTT 2 TIME TO WAIT FOR RESPONSE 

6 COMCCHKT 2 TIME BETWEEN CHECKS ON THIS NODE 

8 COMCNODE 8 ID OF NODE BEING CHECKED 

10 COMCWTC 2 RESPONSE WAIT COUNT 

12 COMCCHKC 2 CHECKING WAIT COUNT 

14 COMCSTSF 1 CXI FLAGS INDICATING CURRENT STATUS 
Values Defined in COMCSTSF 

80 COMCUP THIS NODE CURRENTLY OPERATIONAL 

40 COMCRESP THIS NODE HAS RESPONDED 

20 COMCWAIT AWAITING RESPONSE ON THIS NODE 

10 COMCCKON CHECKING IS ON FOR THIS NODE 

15 COMCBLEN 1 C*2 CHKNODES BLOCK LENGTH IN DOUBLEWORDS 

16 COMCCTYP 1 CX3 TYPE OF COMMUNICATION CHECKING 

Values Defined in COMCCTYP 

02 COMCCPRP INDICATES PROP CHECKING 

01 COMCCHST INDICATES HOST CHECKING 

17 1 RESERVED 
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COMCLIST 


CROSS REFERENCE (Name Disn Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


COMCBLEN 0015 .. 
COMCCHKC 0012 .. 
COMCCHKT 0006 .. 
COMCCHST 0016 01 
COMCCKON 0014 10 


COMCCPRP 0016 02 
COMCCTYP 0016 .. 
COMCLEN .... 18 
C0MCLEND .... 03 


COMCNEXT 0000 .. 
COMCNODE 0008 . . 
COMCRESP 0014 40 
COMCSTSF 0014 .. 


COMCUP 0014 80 
COMCWAIT 0014 20 
COMCNTC 0010 .. 
CQMCWTT 0004 .. 
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CPRB: CONNECTIVITY PROGRAMMING REQUEST BLOCK 

The Connectivity Programming Request Block contains information passed by a 
requester to the SRPI on entry to a server and information passed back from the 
server to the requester. The server can set some of the fields of the CPRB, and the 
system uses other fields. A path and/or device. A buffer may be specified for the 
"OPEN 1 or "QUERY" functions, and the information will be stored in this buffer by 
the console function. 


0 

C*1 C*2 

///////// 

CRBCPRB 

8 

CRBSRTNC 

CRBCRSNC | CRBCRSPC 

10 

CRBSNAME | 

18 

///////// 

CRBFID 

/////////////////// 

20 

//////////* 

V//////////Z 

V//////////////////// 

28 

CRBRQDLN 

CRBRQDAT 

30 

CRBRPDLN 

CRBRPDAT 

38 

CRBRQPLN 

CRBRQPRM 

40 

CRBRPPLN 

CRBRPPRM 

48 

CRBXPNAM 

CRBXPBEG 

50 

CRBXPEND 

CRBXPCRB 

58 

CRBMRDLN 

CRBMRPLN 

60 

CRBTPNAM 

68 

CRBTPFNC 


SIZE 


LENGTH OF CPRB (CRBLEN ) 70 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 


0 

CPRB 

0 

DEFINE TOTAL 

CPRB SPACE 

0 

CRBHDR 

0 

CPRB HEADER 

SECTION 

0 

CRBF1 

1 CXI 

CPRB VERSION 

IDENTIFIER 

1 

CRBFLAGS 

1 CX2 

RESERVED 



Values Defined in CRBFLAGS 


I 80 CRBSINV 
| 2 2 

| 4 CRBCPRB 4 


USED BY CMSSERV 
RESERVED 

CPRB SELF-IDENTIFIER FIELD 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

8 

CRBRTN 

0 

CPRB RETURN CODE SECTION 

8 

CRBSRTNC 

4 

SERVER RETURN CODE 

C 

CRBCRTNC 

0 

ENHANCED CONNECTIVITY FACILITIES RETURN CODE 

C 

CRBCRSNC 

2 

REASON CODE FIELD 

E 

CRBCRSPC 

2 

REPLY CODE FIELD 

10 

CRBDESC 

0 

CPRB DESCRIPTIVE SECTION 

10 

CRBSNAME 

s 

SERVER NAME 

18 


2 

RESERVED 

1A 

CRBFID 

2 

SERVER FUNCTION NUMBER 

1C 


12 

RESERVED 

28 

CRBPARMS 

0 

CPRB PARAMETER SECTION 

28 

CRBRQDLN 

4 

REQUEST DATA AREA LENGTH 

2C 

CRBRQDAT 

4 

REQUEST DATA AREA ADDRESS 

30 

CRBRPDLN 

4 

REPLY DATA AREA LENGTH 

34 

CRBRPDAT 

4 

REPLY DATA AREA ADDRESS 

38 

CRBRQPLN 

4 

REQUEST PARAMETER AREA LENGTH 

3C 

CRBRQPRM 

4 

REQUEST PARAMETER AREA ADDRESS 

40 

CRBRPPLN 

4 

REPLY PARAMETER AREA LENGTH 

44 

CRBRPPRM 

4 

REPLY PARAMETER AREA ADDRESS 

48 

CRBSYSTM 

0 

CPRB SYSTEM SECTION 

48 

CRBXPLST 

0 

EXTENDED PLIST 

48 

CRBXPNAM 

4 

POINTER TO SERVER NAME 

4C 

CRBXPBEG 

4 

BEGINNING OF ARGUMENTS 

| 50 

CRBXPEND 

4 

END OF ARGUMENTS 

| 54 

CRBXPCRB 

4 

POINTER TO CPRB 

1 58 

CRBMRDLN 

4 

MAXIMUM DATA AREA REPLY LENGTH 

1 5C 

CRBMRPLN 

4 

MAXIMUM PARAMETER REPLY LENGTH 

| 60 

CRBTPLST 

0 

TOKENIZED PLIST 

| 60 

CRBTPNAM 

8 

SERVER NAME 

| 68 

CRBTPFNC 

8 

PLIST FENCE - ALL X'FF* 


CPRB 
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CROSS REFERENCE (Name Pi sp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

CPRB 0000 .. CRBHDR 0000 .. CRBRQDAT 002C .. 

CRBCPRB 0004 .. CRBLEN _ 70 CRBRQDLN 0028 .. 

CRBCRSNC O00C .. CRBMRDLN 0058 .. CRBRQPLN 0038 .. 

CRBCRSPC 000E .. CRBMRPLN 005C .. CRBRQPRM 003C .. 

CRBCRTNC 000C .. CRBPARMS 0028 .. CRBRTN 0008 .. 

CRBDESC 0010 .. CRBRPDAT 0034 .. CRB5INV 0001 80 

CRBFID 001A .. CRBRPDLN 0030 .. CRBSNAME 0010 

CRBFLAG5 0001 .. CRBRPPLN 0040 .. CRBSRTNC 0008 .. 

CRBF1 0000 .. CRBRPPRM 0044 .. CRBSYSTM 0048 .. 
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CRBTPFNC 

0068 .. 

CRBTPLST 

0060 .. 

CRBTPNAM 

0060 .. 

CRBXPBEG 

004C .. 

CRBXPCRB 

0054 .. 

CRBXPEND 

0050 .. 

CRBXPLST 

0048 .. 

CRBXPNAM 

0048 .. 
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CQYSECT 


CQYSECT: CONSOLE QUERY MAPPING 

The Console Query DSECT maps a user's buffer with information about a path and/or 
device. A buffer may be specified for the 'open' or 'query' functions, and the 
information will be stored in this buffer by the console function. 


SIZE 

TOTAL CQYSECT LENGTH (CQYSIZE ) 70 

PATH SECTION LENGTH (CQYPATHL) 40 

LENGTH OF DEV + HDR SECTIONS (CQYDHL ) 30 

LENGTH OF DEVICE SECTION CCQYDEVL ) 28 

DISPLACEMENT TO FIRST 6 BYTES DIAG X'8C' INFO (CQYDQR ) 1C 
SIZE OF ALL SECTIONS IN DBWRDS CCQYDBSZ ) E 
REPLY BUFFER HEADER LENGTH (CQYHEADL) 8 

0 

8 

10 
18 
20 
28 
30 
38 
40 
48 
50 

70 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

CQYHEAD 

0 


REPLY BUFFER HEADER 

0 

CQYHPLEN 

4 


LENGTH 

OF PATH SECTION 

4 

CQYHDLEN 

4 


LENGTH 

OF DEVICE SECTION 

8 

CQYDEV 

0 


DEVICE 

DATA SECTION 

8 

CQYDUSCT 

4 


NO. PATHS OPENED TO THIS DEVICE 

C 

CQYDNUMB 

4 


VIRTUAL 

DEVICE NUMBER 

10 

CQYDVIRT 

0 


VIRTUAL 

DEVICE INFO 

10 

CQYDVCLS 

1 

CXI 

VIRTUAL 

DEV TYPE CLASS 

11 

CQYDVTYP 

1 

CX2 

VIRTUAL 

DEVICE TYPE 

12 

CQYDVSTT 

1 

CX3 

VIRTUAL 

DEVICE STATUS 

13 

CQYDVFLG 

1 

CX4 

VIRTUAL 

DEVICE FLAGS 


CQYHPLEN 

CQYHDLEN 

CQYDUSCT 

CQYDNUMB 

CXI 

CX2 

CX3 

CX4 

CX5 

C*6 

CX7 | CX8 

CX9 

CXA 

CXB 

CXC 

CXD 

CXE 

CQYDQRCL 

| CQYDQRRW 

CXF 

/// 

CQYD8CL 

CQYD8CP 

RESERVED 

CQYPEXIT 

CQYPXWRD 

CX10 

RESERVED 

RESERVED 

C*ll 

RESERVED 

CQYPCCW 

CX12 

CX13 

CQYPRCT 

CQYPSCNT 

CQYPSDTA 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

14 

CQYDREAL 

0 

REAL DEVICE INFO 

14 

CQYDRCLS 

1 C*5 

REAL DEVICE TYPE CLASS 

15 

CQYDRTYP 

1 C*6 

REAL DEVICE TYPE 

16 

CQYDRMDL 

1 CX7 

REAL MODEL NUMBER 

17 

CQYDRFTR 

1 C*8 

REAL FEATURE CODE 

18 

CQYDVCNS 

0 

MORE DIAG X f 24* INFO 

18 

CQYDLLEN 

1 C*9 

VIRT. CONSOLE LINE LENGTH 

19 

CQYDTMCD 

1 CXA 

VIRT. CONSOLE TERMINAL CODE 

1A 

CQYDATTR 

1 C*B 

DEVICE ATTRIBUTE FLAGS 

Values Defined in CQYDATTR 

04 

02 

01 

CQYDARMT 

CQYDADSP 

CQYDAVCN 


DEV. IS A REMOTE 3270 

DEV. IS A DISPLAY 

DEV. IS THE VIRTUAL CONSOLE 

IB 

CQYDSTAT 

1 CXC 

DEVICE STATUS FLAG 1 

Values Defined in CQYDSTAT 

80 

40 

CQYDATTN 

CQYDDISC 


ATTENTION PENDING 

DEVICE IS DISCONNECTED 

1C 

CQYDQR 

0 

FIRST 6 BYTES OF DIAG X'SC 1 INFORMATION 

1C 

CQYDQRFL 

1 CXD 

FLAGS 

Values Defined in CQYDQRFL 

80 

40 

20 

01 

CQYDQREC 

CQYDQREH 

CQYDQRPS 

CQYDQR14 


EXTENDED COLOR SUPPORTED 

EXTENDED HIGHLIGHT SUPPORTED 

PSS SUPPORTED 

14-BIT ADDRESSING SUPPORTED 

ID 

CQYDQRPN 

1 C*E 

NUMBER OF PARTITIONS 

IE 

CQYDQRCL 

2 

NUMBER OF COLUMNS 

20 

CQYDQRRW 

2 

NUMBER OF ROWS 

22 

CQYDQYCD 

i C*F 

DEVICE QUERY CODE 

23 


1 

RESERVED 

24 

CQYD8CL 

4 

LENGTH OF REMAINING DIAG X f 8C f INFO 

28 

CQYD8CP 

4 

POINTER TO DIAG X f 8C' BUFFER 

2C 


4 

RESERVED 

30 

CQYPATH 

0 

PATH DATA SECTION 

30 

CQYPEXIT 

4 

USER EXIT ADDRESS 

34 

CQYPXWRD 

4 

USER WORD 
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CQYSECT 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

1 38 

CQYPFLG 

1 

C*10 

PATH FLAG 

Values Defined 

in 

CQYPFLG 

| 80 

CQYPLIO 




PATH DID LAST I/O 

39 


7 



RESERVED 

40 

CQYPSCSW 

0 



CHANNEL STATUS HORD 

40 

CQYPSLCC 

1 

Call 

LOGOUT PENDING/COND. CODES 

Values Defined 

in 

CQYPSLCC 

04 

CQYPL0G 




LOGOUT PENDING 

03 

CQYPCC 




DEFERRED CONDITION CODE 

41 


3 



RESERVED 

44 

CQYPCCW 

4 



LAST CCN EXECUTED 

48 

CQYPUST 

1 

C*12 

UNIT STATUS BYTE 

Values Defined 

in 

CQYPUST 

80 

CQYPATTN 




ATTENTION 

40 

CQYPSTMD 




STATUS MODIFIER 

20 

CQYPCUE 




CONTROL UNIT END 

10 

CQYPBUSY 




BUSY 

08 

CQYPCHEN 




CHANNEL END 

04 

CQYPDVEN 




DEVICE END 

02 

CQYPUNCK 




UNIT CHECK 

01 

CQYPUNEX 




UNIT EXCEPTION 

1 49 

CQYPCST 

1 

CX13 

CHANNEL STATUS BYTE 

Values Defined 

in 

CQYPCST 

80 

CQYPPCI 




PROGRAM-CONTROLLED INTERRUPTION 

40 

CQYPICL 




INCORRECT LENGTH 

20 

CQYPPGCK 




PROGRAM CHECK 

10 

CQYPPRCK 




PROTECTION CHECK 

08 

CQYPCDCK 




CHANNEL DATA CHECK 

04 

CQYPCCCK 




CHANNEL CONTROL CHECK 

02 

CQYPICCK 




INTERFACE CONTROL CHECK 

01 

CQYPCHCK 




CHAINING CHECK 

| 4A 

CQYPRCT 

2 



RESIDUAL COUNT 

1 «C 

CQYPSCNT 

4 



SENSE COUNT 

1 50 

CQYPSDTA 

32 



SENSE DATA 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 


general equates that the copy file may contain. 


CQYDADSP 001A 02 
CQYDARMT 001A 04 
CQYDATTN 001B 80 
CQYDATTR 001A .. 
CQYDAVCN 001A 01 


CQYDBSZ 

• • • • 

E 

CQYDDISC 

001B 

40 

CQYDEV 

0008 

, , 

CQYDEVL 

• • • • 

28 

CQYDHL 

f • t t 

30 


CQYDLLEN 0018 .. 
CQYDNUMB 000C .. 
CQYDQR 001C .. 
CQYDQRCL 001E .. 
CQYDQREC 001C 80 


CQYDQREH 001C 40 
CQYDQRFL 001C .. 
CQYDQRPN 001D .. 
CQYDQRPS 001C 20 
CQYDQRRW 0020 .. 
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CROSS REFERENCE (Name Disp Value) 


CQYDQR14 001C 01 

CQYDQYCD 0022 .. 

CQYDRCLS 0014 . . 

CQYDREAL 0014 .. 

CQYDRFTR 0017 .. 

CQYDRMDL 0016 .. 

CQYDRTYP 0015 .. 

CQYDSTAT 001B . . 

CQYDTMCD 0019 
CQYDUSCT 0008 .. 

CQYDVCLS 0010 .. 

CQYDVCNS 0018 . . 

CQYDVFLG 0013 .. 

CQYDVIRT 0010 .. 


CQYDVSTT 

0012 

m # 

CQYDVTYP 

0011 

* # 

CQYD8CL 

0024 

# # 

CQYD8CP 

0028 

# # 

CQYHDLEN 

0004 


CQYHEAD 

0000 


CQYHEADL 

• • • • 

8 

CQYHPLEN 

0000 

# # 

CQYPATH 

0030 

# 9 

CQYPATHL 

.... 

40 

CQYPATTN 

0048 

80 

CQYPBUSY 

0048 

10 

CQYPCC 

0040 

03 

CQYPCCCK 

0049 

04 


CQYPCCW 

0044 

# # 

CQYPCDCK 

0049 

08 

CQYPCHCK 

0049 

01 

CQYPCHEN 

0048 

08 

CQYPCST 

0049 

# # 

CQYPCUE 

0048 

20 

CQYPDVEN 

0048 

04 

CQYPEXIT 

0030 

# # 

CQYPFLG 

0038 

# # 

CQYPICCK 

0049 

02 

CQYPICL 

0049 

40 

CQYPLIO 

0038 

80 

CQYPLOG 

0040 

04 

CQYPPCI 

0049 

80 


CQYPPGCK 0049 20 

CQYPPRCK 0049 10 

CQYPRCT 004A . . 

CQYPSCNT 004C . . 

CQYPSCSW 0040 . . 

CQYPSDTA 0050 . . 

CQYPSLCC 0040 . . 

CQYPSTMD 0048 40 

CQYPUNCK 0048 02 

CQYPUNEX 0048 01 

CQYPUST 0048 . . 

CQYPXWRD 0034 . . 

CQYSIZE .... 70 
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CVTSECT 


CVTSECT: COMMUNICATIONS VECTOR TABLE AS SUPPORTED BY CMS 


CVTSECT simulates the OS Communications Vector Table. CVTSECT is invoked via the 
CMSCVT macro. The ACMSCVT field in NUCON points to CMSCVT. 


0 

///////// 

CVTMDL 

C*1 

8 




1 

* 

_ 

NOT SUPPORTED 


40 

CVTDATE 





NOT SUPPORTED 





CVTVSS 

CVTVPSM 

58 

CVTEXIT 

CVTBRET 




: 

NOT SUPPORTED 

:: 

78 



C*2 | 


80 

CVTR13 

_ 

88 

CVTNUCB 





NOT SUPPORTED 

_ 1 

AO 



CVTMZ00 | 


: 

NOT SUPPORTED 

l 

B8 




CVTOPTA 


: 

NOT SUPPORTED 

_ 1 

DO 



CVTUSER | 


_ 

NOT SUPPORTED 

1 

. 1 

108 

CVTAVIB 
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HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 


2 

RESERVED 

2 

CVTMDL 

2 

CPU MODEL ID 

4 


4 C*1 

'CSPR' - CMS SYSTEM PRODUCT RELEASE 

8 

CMSCVT 

0 

CVT START 

8 


56 

NOT SUPPORTED 

40 

CVTDATE 

4 

CURRENT DATE IN PACKED DECIMAL 

44 


12 

NOT SUPPORTED 

50 


4 

NOT SUPPORTED 

54 

CVTVPRM 

4 

VECTOR FACILITY PARAMETERS 

54 

CVTVSS 

2 

VECTOR SECTION SIZE 

56 

CVTVPSM 

2 

VECTOR PARTIAL SUM NUMBER 

58 

CVTEXIT 

2 

AN SVC 3 INSTRUCTION (EXIT) 

5A 

CVTBRET 

2 

A BCR 15,14 INSTRUCTION 

5C 


32 

NOT SUPPORTED 

7C 

CVTDCB 

1 CX2 

SYSTEM CONFIGURATION = PCP 

7D 


3 

NOT SUPPORTED 

80 

CVTR13 

4 

R13 SAVED DURING 'OPEN 1 

84 


4 

NOT SUPPORTED 

88 

CVTNUCB 

4 

LOWEST STORAGE ADDRESS NOT IN NUCLEUS 

8C 


32 

NOT SUPPORTED 

AC 

CVTMZQ0 

4 

HIGHEST STORAGE ADDRESS IN MACHINE 

BO 


12 

NOT SUPPORTED 

BC 


2 

NOT SUPPORTED 

BE 

CVTOPTA 

2 

BIT 7 - EXT-PREC FP HRDWRE IN CPU 

CO 


8 

NOT SUPPORTED 

C8 


12 

NOT SUPPORTED 

D4 

CVTUSER 

4 

FIELD AVAILABLE TO USER 

D8 


48 

NOT SUPPORTED 

108 

CVTAVIB 

4 

ADDRESS OF VSAM INTFC BOOTSTRAP 
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CROSS REFERENCE (Nam e Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CMSCVT 

0008 .. 

CVTDCB 

007C . . 

CVTNUCB 

0088 .. 

CVTVPRM 

0054 

CVTAVIB 

0108 .. 

CVTEXIT 

0058 .. 

CVTOPTA 

00BE . . 

CVTVPSM 

0056 

CVTBRET 

005A . . 

CVTMDL 

0002 .. 

CVTR13 

0080 .. 

CVTVSS 

0054 

CVTDATE 

0040 .. 

CVTMZ00 

00AC . . 

CVTUSER 

00D4 .. 
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DBGSECT? DEBUG WORK AREA 

DBGSECT contains the files used by DEBUG for saving registers, breakpoints, PSWs, 
and other data. V-constants in DMSDBD, DMSDBG, and DMSITE point to the DEBUG work 
area. DBGSECT is invoked via the DBGSECT macro. 


CCWPRINT 

[ 


SYMTABLE 

i 


SYMTBG 

j 


1 


BRKPNTBL 

_I 


0 

8 

108 


188 

190 


i 


TBLEND 


ARGS 



__J 

1B8 

JFLAGS j 

D*1 | D*2 | 

ICO 

WAITRD J 

1C8 

D*3 

D*4 | D*5 

WTRDCNT | 

1D0 

ORG 

D*6 j 

1D8 

DEC 

1E0 

DECDEC 

1E8 

ARGSAV 

RETSAV 

1F0 

EXAMLC 

EXAMLG 

1F8 

BEGAT 

STOPAT 

200 

SAVE1 

SAVE2 

208 



DBGSAVl 


248 


288 


DBGSAV2 


DBGSAV3 
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DBGSECT 



LINE1 


340 

348 

360 

368 

370 

378 

380 

388 

390 

398 

3A0 


3B8 

3C0 

3C8 


410 

418 


Jj«X 


D*12 


INPUTSIZ 


i 


HEX 


D*17 
cont. 


D*19j D*2oJ 


i 


LINE1A 


I DX9 J DxioJ DXH 
CONNR 

I D*13 J 


D*I4 


D*15 


C0NHCT 


i 


DX16 


HEXHEX 

BITS 


i 


DX18 


MSG 


MSGPL 


430 


438 

YPSW 

440 

TBLINDX 

BCR | DX21 

448 

DX22| DX23 

DX24| DX25 

DBGXWK 

450 

CONTINUED 
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SIZE 

FOR INITIALIZING TO ZERO (MVCNT2) 2F 
NUMBER OF BYTES IN ARGS (MVCNT1) 28 

HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

CCWPRINT 

8 


PRINTER CCW FOR DEBDUMP 

8 

SYMTABLE 

256 


USER DEFINED SYMBOL TABLE 

108 

SYMTBG 

4 


SYMBOL TABLE ENTRIES 

10C 

BRKPNTBL 

64 


BREAKPOINT TABLE 

18C 

TBLEND 

4 


END ADDRESS OF BREAKPOINT TABLE 

STORAGE AND CONSTANTS FOR NEWLIN AND CONTROL 

190 

ARGS 

40 


ARGUMENTS STORED HERE 

1B8 

ARGMAX 



END OF ARGUMENT AREA 

1B8 

JFLAGS 

6 


FLAGS CORRESPONDING TO ARGS 

ONE 

FLAG FOR EACH PARAMETER: 00 = NUMERIC (0-9) 

FO = HEX (A - F, 0 - 9) 

FF = ALPHABETIC (A - F) 

1BE 

ARGSCT 

1 

D*1 

NUMBER OF ARGUMENTS IN COMMAND LINE 

ICO 

WAITRD 

8 


PARAMETER LIST TO GET INPUT LINE 

1C8 


4 

D*3 

A(INPUT BUFFER) 

ICC 


1 

D*4 

CLEAN UP AND LOGICAL CARRIAGE RETURN 

1CD 


1 

D*5 

X'00 f 

ICE 

WTRDCNT 

2 


BYTE COUNT FILLED IN HERE 

1D0 

ORG 

4 


ORIGIN OF ROUTINE BEING EXAMINED 

THE 

FOLLOWING 

VARIABLES 

ARE USED BY DEBUG AND DEBDUMP 

1D8 

DEC 

8 


BINARY WORD 

1E0 

DECDEC 

8 


DECIMAL WORD 

1E0 

LASTLINE 



32 BYTES FOR LAST LINE DUMPED 

1E8 

ARGSAV 

4 


STORAGE FOR ARGUMENT LOCATION 

1EC 

RETSAV 

4 


STORAGE FOR RETURN ADDRESS 

1F0 

EXAMLC 

4 


FIRST LOCATION TO BE EXAMINED 

1F4 

EXAMLG 

4 


LENGTH OF FIELD TO BE EXAMINED 

1F8 

BEGAT 

4 


BEGINNING PARAMETER BEING PROCESSED 

1FC 

STOPAT 

4 


LAST PARAMETER LOCATION 

200 

SAVE1 

4 


DEBDUMP USES FOR LINE COUNT 

204 

SAVE2 

4 



208 

DBGSAV1 

64 


DEBUG BALR-CALL SAVE 


LY24-5221 (c) Copyright IBM Corp. 1986 

44 CMS Data Areas and Control Block Logic 



Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DBGSECT 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

248 

DBGSAV2 

64 


SAVE AREA FOR CONWAIT/CONREAD 

288 

DBGSAV3 

64 


SAVE AREA FOR USER REGISTERS 

2C8 

TSYM 

16 


SYMBOL ENTRY 

2D8 

XPSW 

8 


PSW TO BE LOADED UPON GO 

2E0 

0UTPT1 

1 

D*7 

BYTE COUNT 

2E1 

LINE 

11 


I/O BUFFER 

2E1 

DBGOUT 



OUTPUT BUFFER 

2E1 

INPUT 



INPUT BUFFER 

2 EC 

LINE1 

87 



31D 

INPUT1 



HEX PACK AREA 

343 

LINE1B 

1 

D*8 


344 

LINE1A 

32 



364 

LINE1C 

1 

D*9 


365 

LINE1D 

1 

DX10 


366 


2 

DX11 

UNUSED 

368 

CONWR 

8 


PLIST TO TYPE OUTPUT LINE 

370 


4 

D*12 


374 


3 

DX13 


377 

CONWRL 

1 

DX14 


378 

INPUTSIZ 

2 


SIZE OF TYPED IN INPUT LINE 

37A 


6 

D*15 


37C 


4 



380 

CONHCT 

8 



388 

HEX 

4 


BINARY WORD 

38C 


4 

D*16 


390 

HEXHEX 

8 


PRINTER GRAPHIC WORD 

398 


1 

D*17 


399 

BITS 

8 



3AF 


10 



3B9 


6 
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)ISP 

NAME 

LEN 

KEY 

DESCRIPTION 

3BF 

DBGSWTCH 

i 1 

D*18 

INTERNAL DEBUG STATUS FLAGS 

Values Defined 

in DBGSWTCH 

80 




UNUSED FLAG 

40 




UNUSED FLAG 

20 

DBDEXIT 



SIGNALS EXIT FROM DEBDUMP 

10 

DBDDMSG 



SIGNALS DUPLICATE MESSAGE IN DEBDUMP 

08 

DBGSET 



SIGNALS SET COMMAND 

04 

DBGPERM 



RESERVED FOR IBM USE 

02 

DBGCOND 



RESERVED FOR IBM USE 

THE FOLLOWING 

IS USED BY DMSDBD 

3C0 

MSGFLAG 

1 

D*19 

INIT MESSAGE FLAG TO NOT USE 

3C1 

DUBMSG 

1 

D*20 

MESSAGE BUFFER 

3C2 

MSG 

80 



THE FOLLOWING 

IS USED BY DMSDBG 

412 

MSGPL 

37 



THE FOLLOWING 

ARE ; 

RESERVED FOR FUTURE USE 

438 

YPSW 

8 


PSW CONTAINING NSI 

440 

TBLINDX 

4 


CURRENT BRKPT TABLE INDEX 

444 

BCR 

2 


NOPR TO PAD DBGXWK WHEN NEEDED 

446 


2 

D*21 

ADDITIONAL NOPR (IF NEEDED) 

448 

ILC 

1 

D*22 

ILC OF INSTRUCTION IN DBGXWK 

449 

ILC11 

1 

D*23 

3 HALFWORD INSTRUCTION (6 BYTES) 

44A 

ILC0110 

1 

D*24 

2 HALFWORD INSTRUCTION (4 BYTES) 

44B 

ILC00 

1 

D*25 

1 HALFWORD INSTRUCTION (2 BYTES) 

44C 

DBGXWK 

6 


RECREATE INSTRUCTION AT BRKPT ADDRESS 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ARGMAX 

0190 

XX 

CONWRL 

0377 

# . 

EXAMLC 

01F0 


LINE1 

02 EC 


ARGS 

0190 


DBDDMSG 

037 F 

10 

EXAMLG 

01F4 


LINE1A 

0344 


ARGSAV 

01E8 

• • 

DBDEXIT 

037F 

20 

HEX 

0388 


LINE1B 

0343 


ARGSCT 

01BE 

* # 

DBGCOND 

037F 

02 

HEXHEX 

0390 

# * 

LINE1C 

0364 


BAL 

• * • • 

45 

DBGOUT 

0325 

XX 

ILC 

0448 


LINE1D 

0365 


BALR 

* • • • 

05 

DBGPERM 

037F 

04 

ILC00 

044B 


MSG 

03C2 


BCR 

0444 


DBGSAV1 

0208 

m # 

ILC0110 

044 A 


MSGFLAG 

03C0 


BEGAT 

01F8 


DBGSAV2 

0248 


ILC11 

0449 


MVCNT 

« • . • 

20 

BITS 

0399 


DBGSET 

037F 

08 

INPUT 

0325 

XX 

MVCNT1 

* • . • 

28 

BRKPNTBL 

010C 


DBGSWTCH 

03BF 


INPUTSIZ 

0378 

, . 

MVCNT2 

• • * • 

2F 

CCWPRINT 

0000 


DBGXWK 

044C 


INPUT1 

0325 

XX 

ORG 

01D0 

, , 

CGNHCT 

0380 


DEC 

01D8 

# # 

JFLAGS 

01B8 

• • 

OUTPT1 

02A0 

, , 

CONHXT 

03B9 

XX 

DECDEC 

01E0 


LASTLINE 

01FC 

XX 

RETSAV 

01 EC 


CONWR 

0368 


| DUPMSG 

03C1 


LINE 

02E1 


SAVE1 

0200 

. . 
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CROSS REFERENCE (Name Disp Value) 


SAVE2 0204 
STOPAT 01FC 
SYMTABLE 0008 


SYMTBG 0108 
TBLEND 018C 
TBLINDX 0440 


TSYM 0288 .. XPSN 
WAITRD 01C0 .. YPSW 
NTRDCNT 01CE .. 



( 




0298 . . 
0438 . . 
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V 

DCHSECT: DATA CONTROL HYPERBLOCK 

DCHSECT is the data control hyperblock that is an in-storage representation of disk 
data blocks as well as the relationship of these blocks on the disk. DCHSECT is 
invoked via the DCH macro. 


0 

DCHFWPTR 

DCHBWPTR 

8 

DCHDWSIZ 

DCHTRUNK 

10 

DCHTDISP 

DCHDTSIZ 

18 

DCHSEQBD 

D*1 | D*2 | D*3 | DX4 

20 

DCHDAMAP 

DCHCHMAP 

28 

DCHF 

*sv 

30 

DCHDATA 


SIZE 

PREFIX PORTION OF HBLK LENGTH IN BYTES (DCHPFIXL) 30 


HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

DCHFWPTR 

4 


FORWARD POINTER 

4 

DCHBWPTR 

4 


BACKWARD POINTER 

8 

DCHDWSIZ 

4 


FULL HYPERBLK STOR SIZE IN DOUBLEWORDS 

C 

DCHTRUNK 

4 


ADDRESS OF NEXT BLOCK UP IN STRUCTURE 

10 

DCHTDISP 

4 


DISPLACEMENT TO DISK ADDRESS IN TRUNK POINTER BLOCK 

14 

DCHDTSIZ 

4 


DATA PORTION SIZE IN BYTES 

18 

DCHSEQBD 

4 


SEQUENTIAL DATA BLK DISPLACEMENT 

1C 

DCHFLG1 

1 

DX1 

DCH FLAG 1 


Values Defined in DCHFLG1 


80 DCHCHOP 
40 DCHNEW 

20 DCHDALLO 
10 DCHCHGD 
08 DCHRALLO 
04 DCHAUX 


DEALL0C THIS DIRECTORY BLOCK DURING DIRECTORY UPDATE 
DO NOT REALLOC THIS DIRECTORY BLOCK DURING DIRECTORY 
UPDATE 

DISK ADDRESS OF BLOCK IS IN DE-ALLOCATION LIST 
BLOCK HAS BEEN ALTERED 

DISK ADDRESS OF BLOCK IS IN RE-ALLOCATION LIST 
AUXILIARY DIRECTORY HAS BEEN CREATED 


f *' 


LY24-5221 (c) Copyright IBM Corp. 1986 

48 CMS Data Areas and Control Block Logic 










Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DCHSECT 


DISP NAME LEN KEY DE SCRIPTION 

ID DCHFLG2 1 D*2 DCH FLAG 2 


Values Defined in DCHFLG2 


80 DCHFULL 
40 DCHDA 
20 DCHLHBLK 
10 DCHDUM 
08 DCHSHR 
04 DCHCACHE 


ALL DISK BLOCKS ALLOCATED IN THIS HBLK 

ALL DISK BLOCKS DEALLOCATED BY ERS 

LAST HBLK IN BUFFER CH FOR ERS 

DUMMY HBLK FOR CHAINING AUXILIARY DIRECTORY 

BLOCK IS IN SHARED STORAGE 

BLOCK IS USED IN CACHING 


IE 

DCHFLG3 

1 

D*3 

IF 

DCHFLG4 

1 

DX4 

20 

DCHDAMAP 

4 


24 

DCHCHMAP 

4 


28 

DCHRSV 

8 


30 

DCHDATA 

8 



DCH FLAG 3 - RESERVED - 

DCH FLAG 4 - RESERVED - 

DEALLOCATION MAP ADDRESS 
CHANGE MAP ADDRESS 
RESERVED 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DCHAUX 001C 04 
DCHBNPTR 0004 .. 

| DCHCACHE 001D 04 
DCHCHGD 001C 10 
DCHCHMAP 0024 .. 
DCHCHOP 001C 80 
DCHDA 001D 40 


DCHDALL0 001C 20 
DCHDAMAP 0020 .. 
DCHDATA 0030 .. 
DCHDTSIZ 0014 . . 
DCHDUM 001D 10 
DCHDWSIZ 0008 .. 
DCHFLG1 001C .. 


DCHFLG2 001D .. 
DCHFLG3 001E . . 
DCHFLG4 001F .. 
DCHFULL 001D 80 
DCHFWPTR 0000 . . 
DCHLHBLK 001D 20 
DCHNEN 001C 40 


DCHPFIXL .... 30 
DCHRALLO 001C 08 
DCHRSV 0028 .. 
DCHSEQBD 0018 .. 
DCHSHR 001D 08 
DCHTDISP 0010 .. 
DCHTRUNK 000C .. 
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V 


DEVSECT: DEVICE TABLE PSECT 

DEVSECT describes the device information required for input/output routines. 

DEVSECT is a DSECT corresponding to the data in a DEVTAB entry. DEVSECT is invoked 
via the DEVSECT macro. 


DEVADDR DX1 

DX2 

DEVNAME 

DEVIPRA 

/// | DX3 | RESERVED 


SIZE 

DEVICE TABLE SIZE IN BYTES (DEVSIZE) 10 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

DEVADDR 

2 

VIRTUAL DEVICE ADDRESS 

2 

DEVFLAG 

1 D*1 

DEVICE FLAGS 

3 

DEVTYPE 

1 DX2 

DEVICE TYPE 

4 

DEVNAME 

4 

SYMBOLIC DEVICE NAME 

8 

DEVIPRA 

4 

INTERRUPT PROCESSING ROUTINE ADDRESS 

C 

DEVMISC 

0 

MISCELLANEOUS - DEVICE DEPENDENT 

C 


1 

RESERVED 

D 

DEVMODE 

1 D*3 


E 


2 

RESERVED 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

DEVADDR 0000 .. DEVIPRA 0008 .. | DEVMODE 000D .. DEVSIZE - 10 

DEVFLAG 0002 .. | DEVMISC 000C .. DEVNAME 0004 .. DEVTYPE 0003 .. 


f 

v 
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DEVTAB 


DEVTAB; DEVICE TABLE 

DEVTAB contains the entries for the various devices handled by CMS (disks, tapes, 
reader, punch, printer, and console). DEVTAB is pointed to by V-constants in DMSIOH 
and DMSITI, and is also referenced indirectly by the ADEVTAB field in NUCON. DEVTAB 
is invoked via the DEVTAB macro. 


0 

CONSOLE 

F0 

ODISK 

c 

C0N1ECB 

100 

PDISK 

10 

ADISK 

110 

QDISK 

20 

BDISK 

120 

RDISK 

30 

CDISK 

130 

SDISK 

40 

DDISK 

140 

TDISK 

50 

EDISK 

150 

UDISK 

60 

FDISK 

160 

VDISK 

70 

GDISK 

170 

NDISK 

80 

HDISK 

180 

XDISK 

90 

IDISK 

190 

YDISK 

A0 

JDISK 

1A0 

ZDISK 

B0 

KDISK 

1B0 

READER1 

CO 

LDISK 

ICO 

PUNCH1 

DO 

MDISK 

1D0 

PRINTER1 

E0 

NDISK 

1E0 

READER2 
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1F0 

PUNCH2 

290 

TAPE8 

200 

PRINTER2 

2A0 

TAPE9 

210 

TAPE0 

2B0 

TAPEA 

220 

TAPE1 

2C0 

TAPEB 

230 

TAPE2 

2D0 

TAPEC 

240 

TAPE3 

2E0 

TAPED 

250 

TAPE4 

2F0 

TAPEE 

26 0 

TAPES 

300 

TAPEF 

27 0 

TAPE6 

310 

DUMMY 

280 

TAPE7 

320 

TABEND 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 




0 

CONSOLE 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

CONSOLE 

C 

CON1ECB 

4 

CONSOLE ECB 




10 

ADISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

ADISK 

20 

BDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

BDISK 

30 

CDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

CDISK 

40 

DDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

DDISK 

50 

EDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

EDISK 

60 

FDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

FDISK 

7 0 

GDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

GDISK 

80 

HDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

HDISK 

0 

IDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

IDISK 

A0 

JDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

JDISK 

B0 

KDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

KDISK 

CO 

LDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

LDISK 

DO 

MDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

MDISK 

E0 

NDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

NDISK 

F0 

ODISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

ODISK 
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DEVTAB 


DISP NAME LEN KEY DESCRIPTION 


100 

PDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

PDISK 

110 

QDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

QDISK 

120 

RDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

RDISK 

130 

SDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

SDISK 

140 

TDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TDISK 

150 

UDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

UDISK 

160 

VDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

VDISK 

170 

WDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

WDISK 

180 

XDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

XDISK 

190 

YDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

YDISK 

1A0 

ZDISK 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

ZDISK 

1B0 

READER1 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

READER1 

ICO 

PUNCH1 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

PUNCH1 

1D0 

PRINTER1 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

PRINTER1 

1E0 

READER2 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

READER2 

1F0 

PUNCH2 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

PUNCH2 

200 

PRINTER2 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

PRINTER2 

210 

TAPE0 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEO 

220 

TAPE1 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE1 

230 

TAPE2 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE2 

240 

TAPE3 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE3 

250 

TAPE4 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE4 

260 

TAPE5 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPES 

270 

TAPE6 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE6 

280 

TAPE7 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE7 

290 

TAPE8 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE8 

2A0 

TAPE9 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPE9 

2B0 

TAPEA 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEA 

2C0 

TAPEB 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEB 

2D0 

TAPEC 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEC 

2E0 

TAPED 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPED 

2F0 

TAPEE 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEE 

300 

TAPEF 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

TAPEF 

310 

DUMMY 

0 

DEVICE 

TABLE 

ENTRY 

FOR 

DUMMY 
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DISP NAME LEN KEY DESCRIPTION 
320 TABEND 0 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ADISK 

0010 .. 

KDISK 

00B0 .. 

READER2 

01E0 .. 

TAPEA 

02B0 


BDISK 

0020 .. 

LDISK 

00C0 .. 

SDISK 

0130 .. 

TAPEB 

02C0 


CDISK 

0030 .. 

MDISK 

00D0 .. 

TABEND 

0320 .. 

TAPEC 

02D0 


CONSOLE 

0000 .. 

NDISK 

00E0 .. 

TAPE0 

0210 .. 

TAPED 

02E0 


C0N1ECB 

000C .. 

ODISK 

00F0 .. 

TAPE1 

0220 .. 

TAPEE 

02F0 


DDISK 

0040 .. 

PDISK 

0100 .. 

TAPE2 

0230 .. 

TAPEF 

0300 


DUMMY 

0310 .. 

PRINTER1 

01D0 .. 

TAPE3 

0240 .. 

TDISK 

0140 


EDISK 

0050 .. 

PRINTER2 

0200 .. 

TAPE4 

0250 .. 

UDISK 

0150 


FDISK 

0060 .. 

PUNCH1 

01C0 .. 

TAPE5 

0260 .. 

VDISK 

0160 


GDISK 

0070 .. 

PUNCH2 

01F0 .. 

TAPE6 

0270 .. 

NDISK 

0170 


HDISK 

0080 .. 

QDISK 

0110 .. 

TAPE7 

0280 .. 

XDISK 

0180 


IDISK 

0090 .. 

RDISK 

0120 .. 

TAPE8 

0290 .. 

YDISK 

0190 


JDISK 

00A0 .. 

READER1 

01B0 .. 

TAPE9 

02A0 . . 

ZDISK 

01A0 
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DIB 


DIB? DISK INFORMATION BLOCK TABLE 

DIB simulates the VSE disk information block. The DIBPT field of BGCOM points to 
the DIB. DIB is invoked via the DIB macro. 


HEX 


DISP NAME 

LEN KEY DESCRIPTION 

SYSLINK DIB 

ENTRY 


0 

7 

SYSLINK DIB ENTRY CCHH000 

7 

2 

STARTING ADDR PCIL CYLINDER 

9 

15 

RESERVED 

SYSIN DIB 

ENTRY 


18 

7 

CURRENT ADDRESS BBCCHHR 

IF 

3 

KEY AND DATA LENGTH KDD 

22 

7 

END ADDRESS BBCCHHR 

29 

2 

UPPER AND LOWER HEAD LIMIT 

2B 

1 

MAXIMUM NUMBER OF RECORDS 

2C 

2 

RECORD COUNT 

2E 

2 

RESERVED 

SYSPUNCH DIB ENTRY 


30 

7 

CURRENT ADDRESS BBCCHHR 

37 

3 

KEY AND DATA LENGTH KDD 

3A 

7 

END ADDRESS BBCCHHR 

41 

2 

UPPER AND LOWER HEAD LIMIT 

43 

1 

MAXIMUM NUMBER OF RECORDS 

44 

2 

RECORD COUNT 

46 

2 

RESERVED 

SYSLST DIB 

ENTRY 


48 

7 

CURRENT ADDRESS BBCCHHR 

4F 

3 

KEY AND DATA LENGTH KDD 

52 

7 

END ADDRESS BBCCHHR 
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DISP NAME LEN KEY 

59 2 

5B 1 

5C 2 

5E 2 

PROCEDURE DIB ENTRY 

60 7 

67 3 

6A 7 

71 2 

73 1 

74 2 

76 2 


de scriptio n 

UPPER AND LOWER HEAD LIMIT 
MAXIMUM NUMBER OF RECORDS 
RECORD COUNT 
RESERVED 


CURRENT ADDRESS BBCCHHR 
KEY AND DATA LENGTH KDD 
END ADDRESS BBCCHHR 
UPPER AND LOWER HEAD LIMIT 
MAXIMUM NUMBER OF RECORDS 
RECORD COUNT 
RESERVED 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

DIB 0000 .. 


( 
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DIOSECT 


DIOSECT: DISK I/O WORK AREA 

DIOSECT describes the fields used by DMSDIO as a work area when reading and writing 
actual blocks of data on CMS disks. DIOSECT is pointed to by a V-constant in 
DMSNUC, and referenced indirectly by ADIOSECT in NUCON. DIOSECT is invoked via the 
DIOSECT macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 

80 

88 

90 

A8 

B0 

B8 

CO 


I00LD 

DI0CSW 

PWAIT 


J QQDSK1 J QQDSK2 
CCWA 
CCW1A 
CCW2 
CCW3 
RWCCW 

SEEKADR J A*1 

FBACCWD1 

FBACCWL1 


FBACCWX1 


A*2 

/////////////// 

FBACD1M0 

FBACD1FB 

FBACD1LB 

A*3 

| AX4 | FBACL1NB 

FBACL1B0 

LASTCYL 

LASTHED 

A*5 

AX6 | 


SENSB 


_iz 

SENCCW 

DOUBLE 


XRSAVE 


i 



LY24-5221 (c) Copyright IBM Corp. 1986 


CMS Data Areas and Control Block Logic 57 
































DIGSECT 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


100 

108 

110 

118 

120 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

I00LD 

8 

I/O-OLD-PSW (FROM INTERRUPT ROUTINE) 

8 

DIOCSW 

8 

CSW (FROM INTERRUPT ROUTINE) 

WAIT 

CALLING SEQUENCE 


10 

PWAIT 

8 


18 


4 

FILLED IN TO CORRECT SYMBOLIC DISK NO. 

1C 


4 


20 


4 


24 

QQDSK1 

2 

TWO BYTES ALWAYS = 0 

26 

QQDSK2 

2 

2ND HALFWORD COPY OF 16TH TRACK DISK-ADDRESS 

CCW 

CHAIN 



28 

CCW1 

8 

SEEK 

30 

CCW1A 

8 

SEEK OR SET SECTOR 

38 

CCW2 

8 

SEARCH 

40 

CCW3 

8 

TIC BACK TO SEARCH 

48 

RWCCW 

8 

READ OR WRITE DATA 

50 

SEEKADR 

7 

SEEK/SEARCH INFORMATION (1ST 3 BYTES ARE 0) 

57 

SECTNUM 

1 AX1 

SECTOR NUMBER 

FBA 

CCWS FOR USE 

IN ONE 

-CMS-BLK OPERATIONS 

58 

FBACCWD1 

8 

DEFINE EXTENT OF FULL MINIDISK 

60 

FBACCWL1 

8 

LOCATE FBA BLOCK FOR NEXT OPERATION 

68 

FBACCWX1 

8 

READ A NUMBER OF FBA BLKS 

70 

FBACD1 

1 AX2 

MASK 

71 


3 

RESERVED 

74 

FBACD1M0 

4 

MAJOR OFFSET 

78 

FBACD1FB 

4 

FIRST BLOCK OFFSET 
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MSP 

NAME 

LEN 

KEY 

DESCRIPTION 

7C 

FBACD1LB 

4 


LAST BLOCK OFFSET 

LOCATE LIST 




80 

FBACL1 

1 

A*3 

OPERATION 

81 


1 

A*4 

AUX BYTE 

82 

FBACL1NB 

2 


NUMBER OF BLOCKS 

84 

FBACL1B0 

4 


BLOCK OFFSET 

I/O 

INFORMATION 




88 

LASTCYL 

4 


BECOMES 1 LAST CYLINDER-NUMBER USED 1 

8C 

LASTHED 

4 


BECOMES 'LAST HEAD-NUMBER USED' 

90 

DEVTYP 

1 

AX5 

01 = 2311,08 = 2314,09 = 3330, 

91 

DIOFLAG 

1 

AX6 

RDTK/WRTK FLAG: 


Values Defined in DIOFLAG 


18 

DIAGNUM 



NUMBER ASSIGNED BY 'CP' FOR DIAGNOSE : 

I/O 

04 

TOOBIG 



BYTE-COUNT > 800 


02 

WRTKF 



WRITING FIRST CHAIN LINK 


01 

QQTRK 



HANDLING FIRST CHAIN LINK 


92 

SENSB 

24 


SENSE INFORMATION 


B0 

SENCCW 

8 




B8 

DOUBLE 

8 


(SCRATCH-AREA, FOR CVD USE ETC.) 


KEEP 

THE FOLLOWING 

IN ORDER: 


CO 

XRSAVE 

60 


REGISTERS 0-14 SAVED HERE FOR RDTK-WRTK 

FC 


3 


FIRST 3 BYTES OF R15 ERROR-CODE 


FF 

ERRCODE 

1 

A*7 

ERROR-CODE (IN R15 AT EXIT) 


KEEP 

THE FOLLOWING 

TWO 

IN ORDER: 


100 

FREERO 

4 


NUMBER OF DOUBLEWORDS OF FREE STORAGE 

(IF ANY) 

104 

DIOFREE 

4 


ADDRESS OF FREE STORAGE FOR BUFFER OR 

CCW'S 

108 

SAVEADT 

4 


HANDY PLACE FOR AN ADT ADDRESS 


110 

CCWX 

8 


SET SECTOR 


118 

DIAGRET 

1 

AX8 

CP'S DIAGNOSE RETURN CODE IF NON-ZERO 


119 

IOCOMM 

1 

A*9 

SET TO READ (06) OR WRITE (05) 


11A 

LASTREC 

1 

AX10 

NUMBER (1-14) OF THE LAST RECORD PROCESS 

120 

DI0CCW01 

1024 

CCW BUILD AREA FOR LONG OPERATIONS 



DIOSECT 
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CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


cc 

0120 

40 

FBACL1 

0080 

, , 

CD 

0120 

80 

FBACL1B0 

0084 

, , 

riFl/TYP 

nn on 


FRATI 1 NR 

nna? 

. 

DIAGNUM 

0091 

is 

FBADEF 

0120 

63 

DIAGRET 

0118 


FBADWDT 

0120 

CO 

DIOCCWOl 

0120 


FBADWIN 

0120 

40 

DIOCSW 

0008 


FBAIPL 

0120 

02 

DIOFLAG 

0091 


FBALOC 

0120 

43 

DIOFREE 

0104 


FBALRDT 

0120 

06 

DOUBLE 

00B8 


FBALWDT 

0120 

01 

ERRCODE 

00FF 


FBARD 

0120 

42 

FBACD1 

0070 


FBAWR 

0120 

41 

FBACD1FB 

0078 


FREER0 

0100 

. , 

FBACD1LB 

007C 


IDA 

0120 

04 

FBACD1M0 

0074 


I0C0MM 

0119 

. . 


I00LD 

0000 

# • 

SECTNUM 

0057 


LASTCYL 

0088 

• • 

SEEK 

0120 

07 

LASTHED 

008C 


SEEKADR 

0050 


LASTREC 

011A 

# * 

SENSB 

0092 

. . 

NOP 

0120 

03 

SENSE 

0120 

04 

PCIF 

0120 

08 

SETSEC 

0120 

23 

PWAIT 

0010 

# # 

SILI 

0120 

20 

QQDSK1 

0024 

• • 

SKIP 

0120 

10 

QQDSK2 

0024 

26 

TIC 

0120 

08 

QQTRK 

0091 

01 

TOOBIG 

0091 

04 

RDCONS 

0120 

0A 

WRDATA 

0120 

05 

RDDATA 

0120 

06 

WRITE 

0120 

01 

READ 

0120 

02 

WRITE1 

0120 

09 

SAVEADT 

0108 


WRTKF 

0091 

02 

SEARCH 

0120 

31 

XRSAVE 

ooco 

. . 
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DIRSECT 


( 

DIRSECT: CMS PDS DIRECTORY ENTRY 

DIRSECT describes the fields of a CMS PDS directory entry. DIRSECT is invoked by 
the LIB macro. 

0 
8 

SIZE 

DIRECTORY ENTRY LENGTH IN BYTES (DIRENTSZ) 10 

I 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 DIRMEMB 8 MEMBER NAME 

8 DIRITEMX 2 SCP 2 BYTE START ITEM NUMBER 

A DIRFLG1 1 DX1 FLAG BYTE 1 

B DIRFLG2 1 D*2 FLAG BYTE 2 

I Values Defined in DIRFLG2 

80 DIRNA NOT AN ALIAS 

C DIRITEM 4 STARTING ITEM NUMBER OF MEMBER 

Values Defined in DIRITEM 
10 DIRNEXT 

( 

CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

DIRENTSZ _ 10 DIRFLG2 000B .. DIRITEMX 0008 .. DIRNA 000B 80 

DIRFLG1 000A .. DIRITEM 000C .. DIRMEMB 0000 .. DIRNEXT 000C 10 


( 
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DMSCCB: COMMAND CONTROL BLOCK 

DMSCCB describes all fields of a VSE command control block (CCB). This DSECT is 
used by DMSXCP to map the CCB specified by a user for an SVC 0 (EXCP). DMSCCB 
passes the address of CCB to DMSXCP. DMSCCB is invoked via the DMSCCB macro. 


0 

CCBCNT | A*1 | A*2 

A*3 

A*4 | A*5 | A*6 

8 

A*7 | CCBCCW 

AX8 

CCBCSW 

10 

CCBLDATB 

CCBLCCWB | 

18 


AX9 

CCBFSCCW | 

20 

CCBRDCCW 

CCBWTCCW 

28 

CCBLWCCW 


30 



38 

CCBNCCB 



HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

CCBST 


START CCB 

0 

CCBD 


COMMAND CONTROL BLOCK 

0 

CCBLEN 

16 

MAP OF THE DOS CCB 

0 

CCBCNT 

2 

RESIDUAL COUNT 

2 

CCBERMAP 

4 

4 BYTES USED TO CHECK ERRORS 

2 

CCBC0M1 

1 A*1 

COMMUNICATIONS BYTE NUMBER 1 


Values Defined in CCBC0M1 


80 CCBWAIT 
40 CCBEOF 
20 CCBIOERR 
10 CCBERROK 
08 CCBRDC 
04 CCBPDE 
02 CCBDCV 
01 CCBUERR 


TRAFFIC BITCSET AT CE) 
END-OF-FILE 

UNRECOVERABLE 1/0 ERROR 
ACCEPT UNRECOVERABLE ERROR 
RETURN DATA CHECKS 
POST AT DEVICE END 
RETURN DATA CHECK RD/CHK 
USER ERROR ROUTINE 


3 CCBC0M2 1 AX2 COMMUNICATIONS BYTE NUMBER 2 


f 
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DMSCCB 


DISP NAME LEN KEY DESCRIPTION 
Values Defined in CCBC0M2 


80 CCBDCCNT 
40 CCBTRKOV 
20 CCBEOC 
10 CCBDC 
08 CCBN0REC 
04 CCBRETRY 
02 CCBVER 
01 CCBCC 


DATA CHECK IN COUNT AREA 
TRACK OVERRUN 
END-OF-CYLINDER 
DATA CHECK 
NO-RECORD-FOUND 
RETRY NO RECORD FOUND 
VERIFY ERROR 
COMMAND CHAIN(RETRY) 


4 

CCBCSW1 

1 A*3 

CSW STATUS BIT NUMBER 1 

Values Defined 

1 in CCBCSW1 

80 

CCBATTN 


ATTENTION 

40 

CCBSTM0D 


STATUS MODIFIER 

20 

CCBCUE 


CONTROL UNIT END 

10 

CCBBUSY 


BUSY 

08 

CCBCE 


CHANNEL END 

04 

CCBDE 


DEVICE END 

02 

CCBUC 


UNIT CHECK 

01 

CCBUE 


UNIT EXCEPTION 

5 

CCBCSW2 

1 A*4 

CSN STATUS BIT NUMBER 2 

Values Defined 

1 in CCBCSW2 

80 

CCBPCI 


PROGRAM-CONTROLLED INTERRUPT 

40 

CCBILEN 


INCORRECT LENGTH 

20 

CCBPR0GM 


PROGRAM CHECK 

10 

CCBPROT 


PROTECTION CHECK 

08 

CCBCHAND 


CHANNEL DATA CHECK 

04 

CCBCHANC 


CHANNEL CONTROL CHECK 

02 

CCBICTRL 


INTERFACE CONTROL CHECK 

01 

CCBCHAIN 


CHAINING CHECK 

6 

CCBSYMU 

2 

SYMBOLIC UNIT(SYSUN) 

6 

CCBSUCLS 

1 A*5 

U - LUB CLASS 

7 

CCBSUNUM 

1 A*6 

N - LUB NUMBER WITHIN CLASS 

8 

CCBLIOBS 

1 A*7 

RESERVED FOR LIOBS 

9 

CCBCCW 

3 

POINTER TO START OF CHANNEL PROGRAM 

C 

CCBC0M3 

1 A*8 

COMMUNICATION BYTE NUMBER 3 

Values Defined in CCBC0M3 

40 

CCBAPEND 


APPENDAGE EXIT AT INTERRUPT 

D 

CCBCSW 

3 

POINT TO CSW OR POINT APPENDAGE RETURN 

10 

CCBLDATB 

4 

ADDRESS OF LAST DATA BLOCK 

14 

CCBLCCWB 

4 

ADDRESS OF LAST CCW BLOCK 

18 


4 

AVAILABLE 
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DISP 


NAME 


LEN KEY DESCRIPTION 


1C 

CCBUFLGS 

1 A*9 

I/O MANAGER CCB FLAGS 

Values Defined in CCBUFLGS 

80 

CCBUEAIC 


ERROR ANALYSIS IN CONTROL 

40 

CCBUEAC 


ERROR ANALYSIS COMPLETE 

20 

CCBURDCW 


READ CCW ACTIVE 

10 

CCBRPS 


RPS CHAN PGM CANDIDATE 

ID 

CCBFSCCW 

3 

SAVE AREA FOR FIRST CCW ADDRESS 

20 

CCBRDCCW 

4 

ADDRESS OF FIRST READ CCW 

24 

CCBWTCCW 

4 

ADDRESS OF FIRST WRITE CCW 

28 

CCBLWCCW 

4 

ADDRESS OF THE LAST WRITE CCW 

2C 


12 

AVAILABLE 

THIS CHAIN FIELD 
IN BKPHD. 

MUST 

HAVE SAME DISPLACEMENT AS FCBCHAIN 

38 

CCBNCCB 

4 

ADDRESS OF NEXT CCB BLOCK 

3C 


4 

AVAILABLE 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CCBAPEND 

oooc 

40 

CCBCUE 

0004 

20 

CCBLDATB 

0010 


CCBSTMOD 

0004 

40 

CCBATTN 

0004 

80 

CCBD 

0000 

00 

CCBLEN 

0000 


CCBSUCLS 

0006 

, , 

CCBBUSY 

0004 

10 

CCBDC 

0003 

10 

CCBLIOBS 

0008 


CCBSUNUM 

0007 

, , 

CCBCC 

0003 

01 

CCBDCCNT 

0003 

80 

CCBLWCCW 

0028 


CCBSYMU 

0006 

, , 

CCBCCW 

0009 


CCBDCV 

0002 

02 

CCBNCCB 

0038 


CCBTRKOV 

0003 

40 

CCBCE 

0004 

08 

CCBDE 

0004 

04 

CCBN0REC 

0003 

08 

CCBUC 

0004 

02 

CCBCHAIN 

0005 

01 

CCBEOC 

0003 

20 

CCBPCI 

0005 

80 

CCBUE 

0004 

01 

CCBCHANC 

0005 

04 

CCBEOF 

0002 

40 

CCBPDE 

0002 

04 

CCBUEAC 

001C 

40 

CCBCHAND 

0005 

08 

CCBERMAP 

0002 

# , 

CCBPROGM 

0005 

20 

CCBUEAIC 

001C 

80 

CCBCNT 

0000 


CCBERROK 

0002 

10 

CCBPROT 

0005 

10 

CCBUERR 

0002 

01 

CCBC0M1 

0002 


CCBFSCCW 

001D 

, , 

CCBRDC 

0002 

08 

CCBUFLGS 

001C 

, , 

CCBC0M2 

0003 


CCBICTRL 

0005 

02 

CCBRDCCW 

0020 

. , 

CCBURDCW 

001C 

20 

CCBC0M3 

OOOC 


CCBILEN 

0005 

40 

CCBRETRY 

0003 

04 

CCBVER 

0003 

02 

CCBCSW 

000D 


CCBI0ERR 

0002 

20 

CCBRPS 

001C 

10 

CCBWAIT 

0002 

80 

CCBCSW1 

0004 


CCBLCCWB 

0014 

, . 

CCBST 

0000 

00 

CCBWTCCW 

0024 

, . 


CCBCSW2 0005 .. 
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DMSFCACH 


DMSFCACH: CACHE USED BY DMSFRE FOR FREE POINTERS 

DMSCACH contains free element pointers for storage management. 


0 

FCASAVE0 

FCASAVE1 

8 

FCASAVE2 

FCASAVE3 

10 

FCASAVE4 

FCASAVE5 

18 

FCASAVE6 

FCASAVE7 

20 

FCASAVE8 

FCASAVE9 

28 

FCASAVEA 

FCASAVEB 

30 

FCASAVEC 

FCASAVED 

38 

FCASAVEE 

FCAHUINF 

40 

FCAHUINF(CONT.) 


48 



50 

FCAHUCHS 


B0 

B8 




FCAHNINF 

CO 

FCAHNINFCCONT.) 


C8 



DO 

FCAHNCHS 

D8 




128 

130 

138 

140 

148 


FCALUINF 


FCALUCHS 


178 


180 

FCALNINF 

188 



190 

FCALNCHS 


198 
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1C8 


SIZE 


LENGTH 

1 OF FREE 

CACHE IN 

BYTES CFCALEN) 1D0 

LENGTH 

1 OF FREE 

CACHE IN 

DOUBLEWORDS (FCALEND) 3A 

HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

FCASAVE 

0 

REGISTER SAVE AREA FOR CALLS TO THE CACHE HANDLER 

0 

FCASAVE0 

4 


4 

FCASAVE1 

4 


8 

FCASAVE2 

4 


C 

FCASAVE3 

4 


10 

FCASAVE4 

4 


14 

FCASAVE5 

4 


18 

FCASAVE6 

4 


1C 

FCASAVE7 

4 


20 

FCASAVE8 

4 


24 

FCASAVE9 

4 


28 

FCASAVEA 

4 


2C 

FCASAVEB 

4 


30 

FCASAVEC 

4 


34 

FCASAVED 

4 


38 

FCASAVEE 

4 


3C 

FCAHIGHU 

0 

CACHE FOR FREE POINTERS-HIGH USER 

3C 

FCAHUINF 

8 

INFORMATION FIELD FOR HIGH USER 

44 

FCAHUCHS 

120 

FIRST CACHE ELEMENT FOR HIGH USER 

BC 

FCAHIGHN 

0 

CACHE FREE POINTERS-HIGH NUCLEUS 

BC 

FCAHNINF 

8 

INFORMATION FIELD FOR HIGH NUCLEUS 

C4 

FCAHNCHS 

108 

FIRST CACHE ELEMENT FOR HIGH NUCLEUS 

130 

FCALOWU 

0 

CACHE FOR FREE POINTERS-LOW USER 

130 

FCALUINF 

8 

INFORMATION FIELD FOR LOW USER 

138 

FCALUCHS 

72 

FIRST CACHE ELEMENT FOR LOW USER 

180 

FCAL0WN 

0 

CACHE FREE POINTERS-LOW NUCLEUS 

180 

FCALNINF 

8 

INFORMATION FIELD FOR LOW NUCLEUS 


V- = „ • 
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DISP 


NAME 


LEN KEY DESCRIPTION 


188 FCALNCHS 72 FIRST CACHE ELEMENT FOR LOW NUCLEUS 

Values Defined in DMSFCACH 


A 

FCAHUNUM 

NUMBER OF FREE POINTERS 
HIGH USER STORAGE 

IN 

CACHE 

FOR 

9 

FCAHNNUM 

NUMBER OF FREE POINTERS 
HIGH NUCLEUS STORAGE 

IN 

CACHE 

FOR 

6 

FCALUNUM 

NUMBER OF FREE POINTERS 
LOW USER STORAGE 

IN 

CACHE 

FOR 

6 

FCALNNUM 

NUMBER OF FREE POINTERS 
LOW NUCLEUS STORAGE 

IN 

CACHE 

FOR 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


FCAHIGHN OOBC .. 
FCAHIGHU 003C .. 
FCAHNCHS 00C4 . . 
FCAHNINF OOBC .. 
FCAHNNUM .... 09 
FCAHUCHS 0044 .. 
FCAHUINF 003C .. 
FCAHUNUM .... 0A 
FCALEN .... 1D0 


FCALEND .... 3A 
FCALNCHS 0188 .. 
FCALNINF 0180 .. 
FCALNNUM .... 06 
FCALOWN 0180 .. 
FCALOWU 0130 .. 
FCALUCHS 0138 .. 
FCALU1NF 0130 .. 
FCALUNUM .... 06 


FCASAVE 0000 . 
FCASAVEA 0000 . 
FCASAVEA 0028 . 
FCASAVEB 002C . 
FCASAVEC 0030 . 
FCASAVED 0034 . 
FCASAVEE 0038 . 
FCASAVE0 0000 . 
FCASAVE1 0004 . 


FCASAVE2 0008 
FCASAVE3 000C 
FCASAVE4 0010 
FCASAVE5 0014 
FCASAVE6 0018 
FCASAVE7 001C 
FCASAVE8 0020 
FCASAVE9 0024 


DMSFCACH 
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DMSFCHIN: 

DMSFCHIN is a dsect which contains information describing each each. 


CHILAST 

CHINUM 

DX1 

DX2 


SIZE 

SIZE OF ANCHOR TABLE IN BYTES CCHILEN) 8 
SIZE OF ANCHOR TABLE IN DOUBLENORDS (CHILEND) 1 

HEX 

DISP NAME LEN KEY DESCRIPTION 

BEGINNING OF AN ANCHOR TABLE 

0 CHILAST 4 LAST FBD IN THE CACHE OF FREE POINTERS 

4 CHINUM 2 NUMBER OF FREE POINTERS IN CACHE 

6 CHIFLAG 1 DX1 FLAG FIELD 

Values Defined in CHIFLAG 

80 CHIREL ON IF FBD IS TO BE RELEASED 

7 1 D*2 RESERVED 


CROSS REFERENCE (Name Pisp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

CHIFLAG 0006 .. I CHILEN _ 08 I CHILEND - 01 I CHINUM 0004 .. 

CHILAST 0000 .. I CHIREL 0006 80 
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DMSVIPWK 


DMSVIPWKs 

Work area 
NUCON. 


LY24-5221 


used by DMSVIP, DMSVIB and DMSVSR. DMSVIPWK is pointed to by AVIPWORK in 


AO 

A8 

BO 

B8 

CO 

C8 

DO 

D8 

EO 

E8 

FO 

F8 

100 

108 


140 

148 

150 


180 

188 
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CBWKAR 


WKMISC 

AECBEACE 

AERET 


HEACE 

CBMR34 

COPYNUM | DX1 | D*2 

SAVER0 

SAVER1 

SAVER2 

SAVER3 

SAVER4 

SAVER5 

SAVER6 

SAVER7 

SAVER8 

SAVER9 

SAVER10 

SAVERll 

SAVER12 

SAVER13 

SAVER14 


EXLSA 





LASTEXL 

VIPOVFL 

OFVLNUM | D*3 | D*4 

VIP3R1 


= VIP3R213 

_____ _J 


VIP3R14 

VIP3W0RK 

SAVEAAA 
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190 

SAVEBBB 

SAVECCC | 

198 

SAVEDDD 



SIZE 

LENGTH OF DMSVIPWK (DMSVIPSZ) 19C 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

CBWKAR 

168 

DOS VSAM CNTL BLK BUILD AREA 

A8 

WKMISC 

4 

WORK SPACE 

AC 

CBMACAR 

0 

CNTL BLK MANIP MACRO WK AREA 

AC 

AECBEACE 

4 

SAVED ECB EACE ADDRESS 

B0 

AERET 

4 

TESTCB—ADDR OF USER ERET RTN 

B4 

HEACE 

0 

HEADER ACE SAVE AREA 

CO 

CBMR34 

8 

SAVE FOR WORK REGS 

C8 

COPYNUM 

2 

SAVE FOR NUMBER OF COPIES 

CA 

CBMACFLG 

1 D*1 

FLAG BYTE 


Values Defined in CBMACFLG 


80 CCLOW 
40 CCEQUAL 
20 CCHIGH 
08 WORKAREA 
04 ERET 


PSW CONDITION CODE = 1 
PSW CONDITION CODE = 0 
PSW CONDITION CODE = 2 
USER HAS PROVIDED WORKAREA 
USER PRV 1 D ERET RTN(TESTCB) 


CC 

CC 

VIPRSAVE 

1 D*2 

0 

CC 

SAVERO 

4 

DO 

SAVER1 

4 

D4 

SAVER2 

4 

D8 

SAVER3 

4 

DC 

SAVER4 

4 

EO 

SAVER5 

4 

E4 

SAVER6 

4 

E8 

SAVER7 

4 

EC 

SAVER8 

4 

FO 

SAVER9 

4 

F4 

SAVER10 

4 

F8 

SAVER11 

4 

FC 

SAVER12 

4 

100 

SAVER13 

4 


UNUSED 

SAVE AREA FOR CALLER*S REGS 
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DMSVIPWK 


DISP NAME LEN KEY DESCRIPTION 


104 

SAVER14 

4 


108 

EXLSA 

60 

PRIMARY EXLST ADDR SAVE AREA 

144 

LASTEXL 

4 

LAST ADDRESS SAVE SLOT 

148 

VIPOVFL 

4 

PTR TO 1ST OVERFLOW BLOCK 

14C 

OVFLNUM 

2 

TOT NUM OF OVFL BLKS ALLOC 

14E 

VIPINDC 

1 D*3 

INDICATOR BYTE 

Values Defined in VIPINDC 

80 

SETE0DAD 


EODAD RTN SET INACTIVE 

40 

SETSYNAD 


SYNAD RTN SET INACTIVE 

40 

OPTDUMP 


•OPTION DUMP• IND IN BGCOM 

20 

SETLERAD 


LERAD RTN SET INACTIVE 

03 

EOJEXIT 


TAKE E0J EXIT 

02 

MRECL 


MODCB RPL RECLEN PROCESSING 

01 

SRECL 


SHOWCB RPL RECLEN PROCESSING 

14F 

RTNCDSV 

1 DX4 

CK PR0C—RPL RET CODE SAVE 

150 

VIP3REGS 

0 


150 

VIP3R1 

4 


154 

VIP3R213 

48 


184 

VIP3R14 

4 


188 

VIP3W0RK 

4 


18C 

SAVEAAA 

4 

SAVE REG3 FOR BLDEXLSA 

190 

SAVEBBB 

4 

NOT USED YET 

194 

SAVECCC 

4 

NOT USED YET 

198 

SAVEDDD 

4 

NOT USED YET 

19C 

VIPWKEND 

0 

END OF VIPWORK 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AECBEACE 

00AC 


HEACE 

00B4 


SAVER10 

00F4 


SETLERAD 

014E 

20 

AERET 

00B0 


LASTEXL 

0144 


SAVER11 

00F8 


SETSYNAD 

014E 

40 

CBMACAR 

OOAC 


LCBMAC 

• • • • 

20 

SAVER12 

OOFC 


SRECL 

014E 

01 

CBMACFLG 

OOCA 


LCBWK 

• • • • 

AC 

SAVER13 

0100 


VIPINDC 

014E 


CBMR34 

OOCO 


MRECL 

014E 

02 

SAVER14 

0104 


VIPOVFL 

0148 


CBWKAR 

0000 


OPTDUMP 

014E 

40 

SAVER2 

00D4 


VIPRSAVE 

OOCC 


CCEQUAL 

OOCA 

40 

OVFLNUM 

014C 


SAVER3 

00D8 


VIPWKEND 

019C 


CCHIGH 

OOCA 

20 

RTNCDSV 

014F 


SAVER4 

00 DC 


VIP3REGS 

0150 


CCLOW 

OOCA 

80 

SAVEAAA 

018C 


SAVER5 

00E0 


VIP3R1 

0150 


COPYNUM 

00C8 

# # 

SAVEBBB 

0190 


SAVER6 

00E4 


VIP3R14 

0184 


DMSVIPSZ 

• • • • 

19C 

SAVECCC 

0194 


SAVER7 

00E8 


VIP3R213 

0154 


EOJEXIT 

014E 

03 

SAVEDDD 

0198 


SAVER8 

00 EC 


VIP3W0RK 

0188 


ERET 

OOCA 

04 

SAVERO 

OOCC 


SAVER9 

00F0 


WKMISC 

00A8 


EXLSA 

01081 

. . 

SAVER1 

00D0| 


SETEODAD 

014EI 

80 

WORKAREA 

OOCA 

08 
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DOSSECT: VSE SIMULATION CONTROL BLOCK 

DOSSECT simulates the CMS file control block CFCB) in the CMS/DOS environment. 
DOSSECT is invoked by the DOSCB macro. 

The DOS simulation control blocks are chained together. The DOSFIRST field in 
NUCON points to the first DOSCB in the chain, or if no chain exists, contains 
zero. 


SIZE 


0 

DOSNEXT 

DOSCBID 

8 

DOSDD 

10 

DOSOP 

18 

DOSDSNAM 

20 

DOSDSTYP 

28 

DOSDSMD 

///////// 

DOSBUFF | 

30 

DOSBYTE 

D*1 

D*2 

///////// | 

38 

DOSREAD 

DOSITEM | 

40 

DOSCOUT 

D*3 

D*4 

DOSBLKSZ j 

48 

D0SW0RK j 

50 

D*5 | D*6 

D*7 | D*8 

DOSOSFST 

58 

DOSOSDSN 

DOSVOLTB 

60 

DOSEXTTB 

DOSSENSE 

DX9 | Dxio| 

68 

DOSBUFSP 

DOSUCNAM | 

70 

D0SUCNAM (cont.) 






DOSSAVE 


: 

88 



D*ll 

DX12 

_ 

90 

DOSDTF 

D0SF1AD j 

98 

DOSCC 

DOSHH 

DOSR 

/////////////// j 

A0 

DOSEND 

SIZE IN DOUBLEWORDS (DOSENSIZ) 

14 
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DOSSECT 


HEX 


DISP 

NAME 

LEN 

[ K£I 

DESCRIPTION 

0 

DOSINIT 

1 


DOSCB FLAG BYTE 

Values Defined in DOSINIT 

40 

D0S0S 



CREATED BY f OS f USER 

20 

DOSDOS 



DEFINED FOR NON-CMS DISK 

10 

DOSCMS 



DEFINED FOR CMS DISK 

08 

DOSDDCAT 



USER CATALOG DATASET 

04 

DOSPERM 



PERMANENT CONTROL BLOCK 

02 

DOSJCAT 



SEARCH VSAM JOB CATALOG 

01 

DOSUCAT 



SEARCH VSAM USER CATALOG 

0 

DOSNEXT 

4 


AL3 (NEXT DOSCB) 

4 

DOSCBID 

4 


1 DLBL 1 TO DISTINGUISH FROM CMSCB 

8 

DOSDD 

8 


DATA DEFINITION NAME 

10 

DOSOP 

8 


CMS OPERATION 

18 

DOSTAPID 



TAPE IDENTIFICATION 

18 

DOSDSNAM 

8 


DATASET NAME 

20 

DOSDSTYP 

8 


DATASET TYPE 

28 

DOSDSMD 

2 


DATASET MODE 

2A 


2 


RESERVED 

2C 

DOSBUFF 

4 


A (INPUT/OUTPUT BUFFER) 

30 

DOSBYTE 

4 


SIZE OF BUFFER (DATA COUNT) 

34 

DOSFORM 

1 

D*1 

FILE FORMAT: FIXED/VARIABLE 

35 

DOSEPL 

1 

D*2 

EXTENDED PLIST 

36 


2 


RESERVED 

38 

D0SREAD 

4 


N* BYTES ACTUALLY READ 

3C 

DOSITEM 

4 


ITEM (RECORD) NUMBER 

40 

DOSCOUT 

4 


RECORDS PER CMS PHYSICAL BLOCK 

44 

DOSDEV 

1 

DX3 

DEVICE TYPE CODE 

Values Defined in DOSDEV 

14 

DOSDSK 



DISK 

00 

DOSDUM 



DUMMY DEVICE 

45 

DOSTAPMD 

1 

D*4 

TAPE MODESET SAVE 

46 

DOSBLKSZ 

2 


BLOCK SIZE 

48 

DOSWORK 

8 


WORK AREA 

50 

DOSYSXXX 

2 


LOGICAL UNIT FOR CMS/DOS 

50 

DOSSYS 

1 

D*5 

SYS/PROG UNIT: X'OO' =SYS, X f 01'=PROG 

51 

DOSXXX 

1 

D*6 

NUMBER FROM 000-255 ASSOC WITH UNIT 
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DISP 

NAM|E 

LEN 

KEY 

DESCRIPTION 

52 

DOSEXT 

1 

DX7 

NUMBER DOS EXTENTS LEFT TO PROCESS 

53 

DOSEXTCT 

1 

DX8 

CURRENT DOS EXTENT 

54 

DOSOSFST 

4 


POINTER TO OS FST 

58 

DOSOSDSN 

4 


POINTER TO OS DSNAME BLOCK 

5C 

DOSVOLTB 

4 


ACVOLUME ID TABLE)-VSAM MULTIVOL DATASET 

60 

DOSEXTTB 

4 


AC EXTENT TABLE) FOR VSAM DATASPACE 

64 

DOSSENSE 

2 


I/O SENSE DATA 

66 

D0SV0LN0 

1 

D*9 

NUMBER VOLUMES C ENTRIES IN DOSVOLTB) 

67 

D0SEXTN0 

1 

DX10 

NUMBER EXTENTS CENTRIES IN DOSEXTTB) 

68 

DOSBUFSP 

4 


SIZE OF VSAM I/O BUFFERCS) 

6C 

DOSUCNAM 

8 


VSAM USER CATALOG DDNAME 

74 

DOSSAVE 

24 


TEMPORARY SAVE FOR RE-ENTRANT CODE 

8C 

DOSEXTCX 

1 

DX11 

CURRENT EXTENT CUSED BY DMSXCP) 

8D 

DOSTYPE 

1 

DX12 

DATASET TYPE CSAM=S, VSAM=A) 

90 

DOSDTF 

4 


POINTER TO DTF 

94 

D0SF1AD 

4 


POINTER TO FI LABEL 

98 

DOSCCHHR 



DOS CCHHR 

98 

DOSCC 

2 


DOS CC - CYLINDER 

9A 

DOSHH 

2 


DOS HH - TRACK 

9C 

DOSR 

1 


DOS R - RECORD 

9D 


3 


RESERVED 

AO 

DOSEND 



END ADDRESS OF THIS BLOCK 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DOSBLKSZ 

0046 


DOSDSMD 

0028 

# # 

D0SF1AD 

0094 

• • 

DOSSAVE 

0074 

• • 

DOSBUFF 

002C 


DOSDSNAM 

0018 

9 # 

DOSHH 

009A 


DOSSENSE 

0064 


DOSBUFSP 

0068 


DOSDSTYP 

0020 


DOSINIT 

0000 


DOSSYS 

0050 


DOSBYTE 

0030 


DOSDTF 

0090 

# m 

DOSITEM 

003C 


DOSTAPID 

0018 


DOSCBID 

0004 


DOSDUM 

0044 

00 

DOSJCAT 

0000 

02 

DOSTAPMD 

0045 


DOSCC 

0098 


DOSEND 

00A0 

9 # 

DOSNEXT 

0000 


DOSTYPE 

008D 


DOSCCHHR 

0094 

98 

DOSENSIZ 

• • • • 

14 

DOSOP 

0010 


DOSUCAT 

0000 

oi 

DOSCMS 

0000 

10 

DOSEPL 

0035 

9 # 

DOSOS 

0000 

40 

DOSUCNAM 

006C 


DOSCOUT 

0040 

# # 

DOSEXT 

0052 

m # 

DOSOSDSN 

0058 


DOSVOLNO 

0066 


DOSDD 

0008 


DOSEXTCT 

0053 

• • 

DOSOSFST 

0054 


DOSVOLTB 

005C 


DOSDDCAT 

0000 

08 

DOSEXTCX 

008C 

m # 

DOSPERM 

0000 

04 

DOSHORK 

0048 


DOSDEV 

0044 

m # 

DOSEXTNO 

0067 

• • 

DOSR 

009C 


DOSXXX 

0051 


DOSDOS 

0000 

20 

DOSEXTTB 

0060 

# # 

DOSREAD 

0038 


DOSYSXXX 

0050 


DOSDSK 

0044 

14 

DOSFORM 

0034 

• • 
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DTFSD 


DTFSD; OPEN DTF MAP 


DTFSD describes fields within the DTF for sequential disk files and is used in the 
CMS/DOS environment. DTFSD is invoked by the DTFSD macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

A0 

A8 

B0 

B8 

CO 

C8 

DO 

D8 

E0 

E8 


DTFCOUNT 

DTFTRANS 

DTFCSW 

DX1 

DTFLU 

D*2 

DTFCCW 

D*3 

D*4 | 

D*5 

DTFLGMOD 

D*6 

D*7 

DTFNAME | 

DTFNAME (cont.) 

D*8 

DX9 

DX10 

DX11 

D*12 

D*13 

DX14 

DX15 

DX16 

DX17 

D*18 

D*19 

D*20 

DX21 

DX22 

DX23 

DTFI0A1 

DTFULADR 

DTFLHLIM 

DTFULPBN 

( cor 

it. ) 

DX24 

DX25 

DX26 

DX27 

DX28 

DX29 

D*30 

DX31 

DTFRECSZ 

D*32 

DTFWERAD 

D*33 

DX34 

DTFBLKSZ 

DX35 

D*36 

D*37 

D*38 

D*39 

DTFCPDTL 

D*40 

D*41 

DX42 

DX43 


DTFAVA1L 

DTFIEND 


i 


DTFLOGRS 

DTFDERAD 


i 


D*44 
DX46 


DX45 


D*47 


D*48 1 DTFFLEOX 

DX49 

DTFULEOX 

DX50 

DTFVLEOX 

DTFVIRLN 

DTFVUPBN 

DX51 | DTFCFEOX 

DTFVULBL | D*52 

| DX52 (continued) | 

DTFVORLN 

DTFVOSRR 

D*53 j DX54 

DX55 

DTFVURLN 

D*56 

D*57 | D*58 | D*59 

D*6 0 

DTFVUCI1 

DTFVULB1 DX61 

D*62 

D*63 DX64 D*65 
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HEX 

DISP NAME LEN KEY DESCRIPTION 


0 DTFCCB 
0 DTFCOUNT 2 

2 DTFTRANS 2 


CCB 

CCB-COUNT 

CCB-TRANSMISSION INFORMATION 


Values Defined in DTFTRANS 


80 DTFTRAF 
80 DTFDCH1 
40 DTFEOF 
20 DTFUNRC 
10 DTFACPT 
10 DTFDCH2 
04 DTFNRCF 
02 DTFVERR 


CCB“TRAFFIC BIT 
DASD DATA CHECK 
CCB“END OF FILE 
CCB-UNRECOVERED I/O ERROR 
CCB-ACCEPT UNRECOVERED ERROR 
DASD DATA CHECK 
NO RECORD FOUND FOR DASD 
DASD VERIFY ERROR 


4 DTFCSW 2 CCB-CSW STATUS BITS 


Values Defined in DTFCSW 


40 DTFINCL INCORRECT LENGTH SPECIFICATION 

01 DTFUE CCB-UNIT EXCEPTION 


6 DTFTYPLU 


CCB“TYPE/LOGICAL UNIT 


6 DTFTYPC 1 DXl CCB-TYPE CODE 


Values Defined in DTFTYPC 


01 

DTFPLU 



1=PR0G LOG UNIT 

7 

DTFLU 

1 


CCB“L0GICAL UNIT 

8 


1 

D*2 

RESERVED FOR LIOCS 

8 

DTFCCWA 



WORD WITH CCW POINTER 

9 

DTFCCW 

3 


CCB-CCW ADDRESS 

C 


1 

D*3 

RESERVED FOR PIOCS 

D 


3 

D*4 

CCB-CCW ADDRESS IN CSW 

10 

DTFLGMDA 



WORD WITH LOGIC MODULE ADDRESS 

10 

DTFFLG1 

1 

D*5 

DTF FLAGS 


Values Defined in DTFFLG1 


80 

DTFDQEXT 


DEQUE OLD VOL XTNTS 

80 

DTFDAULI 


1=DA PH TRL LABELS 

0=DA PH HDR LABELS 

40 

DTFSPECL 


SPECIAL SYSTEM OPEN 

20 

DTFIGNOP 


COBOL IGN OPTION 

10 

DTFBLHLD 


BLOCK HOLD OPTION SPECIFIED 

04 

DTFTRLBL 


PROC TRAILER LBL-CLOSE 

02 

DTFSPAND 


SPANNED PROCESSING 

01 

DTFEOEXT 


COBOL END“OF“EXTENT 

11 

DTFLGMOD 

3 

LOGIC MOD ADDRESS 

14 

DTFTYPE 

I D*6 

DTF TYPE 
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DISP NAME LEN KEY DESCRIPTION 


15 

DTFFLG2 

1 D*7 

DTF FLAGS 

Values Defined 

1 in DTFFLG2 

80 

DTFDAOUT 


1=DA OUTPUT, 0=DA INPUT 

40 

DTFBLKFL 


BLOCKED FILE 

40 

DTFWKDLT 


DELETE WORKFILE 

40 

DTFDAVER 


DTFDA VERIFY OPTION 

20 

DTFWRKFL 


WORKFILE 

20 

DTFDASCH 


DTFDA SRCHM OPTION 

10 

DTFWORKA 


WORKA = YES SPECIFIED 

10 

DTFWKPTO 


1 = POINT OPEN 

10 

DTFDAAFT 


DTFDA AFTER = YES SPECIFIED 

08 

DTFVER2 


VERSION 2 DTF 

04 

DTFOPEN 


1 = OPEN, 0 = CLOSED 

04 

DTFDAUND 


DTFDA UNDEFINED FORMAT 

02 

DTFINPUT 


1 = INPUT, 0 = OUTPUT 

01 

DTFUSRLB 


USER LABELS SPECIFIED 

16 

DTFNAME 

7 

DTF NAME 

ID 

DTFDEVTP 

1 D*8 

DEVICE TYPE 

IE 

DTFF1ADD 


BCCHHR FMT1 ADDRESS 

IE 

DTFWTKCP 


WORKFILE TRCK CAPACITY 

IE 

DTFDAFSU 


DTFDA 1ST SYM UNIT 

IE 

DTFPHEOF 


EOF INDICATOR FOR DTFPH 

IE 

DTFWKTKC 

1 D*9 

WORKFILE FIRST TRACK CAPACITY BYTE 

IF 


1 DX10 

UNUSED 

20 

DTFF1ADR 

DX11 

FMT1 LABEL ADDRESS IN VTOC 


Values Defined in DTFF1ADR 


40 

20 

01 

DTFDARPS 

DTFPHMV3 

DTFDAXTN 



DTFDA INDICATES THAT DEVICE SUPPORTS RPS 
VERSION 3 INDICATOR DTFPH MOUNTED = ALL 

DTFDA INDICATES THAT DTF HAS BEEN EXTENDED FOR 
THE REENTRANT DAM LOGICMODS 

21 

DTFDAULR 



ADDRESS OF USER LABEL ROUTINE 


21 

DTFIDXSQ 

1 

D*12 

EXTENT SEQUENTIAL NUMBER IN D/X 


22 

DTFIF1SQ 

1 

DX13 

EXTENT SEQUENTIAL NUMBER IN FI 


23 

DTFFMT1R 

1 

D*14 

FMT1 R OF CKD CCHHR 


24 

DTFDAXXR 



ADDRESS OF DA XTNT EXIT INFORMATION 

RETURNED 

24 

DTFVOLNO 



VOLUME SEQUENCE NUMBER 


24 

DTFWKSEQ 

1 

DX15 

EXTNT SEQUENTIAL NO-WKFILE 


25 

DTFWKOCF 

1 

D*16 

WORKFILE OPN COM FIELD 



Values Defined in DTFWKOCF 


40 DTFWKRPS 
20 DTFWKV3 
10 DTFWKXTF 
08 DTFWKNWV 
04 DTFWKFID 
02 DTFWKXTD 


INDICATOR DEVICE SUPPORTS RPS 
VERSION 3 INDICATOR WORKFILE 
INDIC ALL EXTENTS PROCESSED 
EXTENT ON NEW VOLUME 
OK FOR = FILE ID 
AN EXTENT WAS OPENED 


DTFSD 
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DISP NAME LEN KEY DESCRIPTION 

26 DTFFLG3 1 D*17 DTF FLAGS 


Values Defined in DTFFLG3 


80 

DTFNOEXT 

INPUT 

40 

DTFUPDAT 

INPUT 

40 

DTFOXTCL 

OUTPUT 

20 

DTFPRTLB 

INPUT 

OUTPUT 

10 

DTFUEOF 

INPUT 

10 

DTFOHDRL 

OUTPUT 

08 

DTFNEWVL 

INPUT 

OUTPUT 

04 

DTFIRTCL 

INPUT 

04 

DTF1052 

OUTPUT 

02 

DTFIHDRL 

INPUT 

02 

DTFTLCL 

OUTPUT 

01 

DTFDUMEX 

INPUT 

OUTPUT 


DTFODXSQ 

1 D*18 DTF FL 


NO MORE XTNTS OUTPUT-NO MORE XTNTS 
UPDATE FILE 

XTNT NEEDED AT CLOSE TIME 

PROCESS TRL LABEL 

PROCESS TRL LABEL 

EXIT TO USERS EOF ROUTINE 

PROCESS HDR LABEL 

EXTENT ON NEW VOLUME 

EXTENT ON NEW VOLUME 

RETURN TO CLOSE 

XTNT VIA CONSOLE 

PROCESS HDR LABEL 

PROCESS TRAILER LABELS AT CLOSE 

DUMMY EXTENTS 

UNREF FOR FBA 


EXTENT OPENED 


Values Defined in DTFODXSQ 


80 

DTFEXBYP 



INPUT - XTNT BYPASSED 

BEFORE FILE OPENED 

40 

DTFFEOV 



INPUT - FEOV ISSUED 


20 

DTFLSTVL 



INPUT - LAST VOLUME 


28 

DTFFLNML 



FILENAME.L 


28 

DTFSNLEO 



SEQUENTIAL NUMBER OF 

LAST EXTENT OPENED 

28 

DTFDARTA 

1 

DX19 

DISPLACEMENT TO DTFDA 

RELATIVE TRACK ADDRESS TABLE 

29 

DTFULRTN 



ADDRESS OF USER LABEL 

RETURNED 

29 


1 

DX20 

UNREFERENCED 


2A 

DTFCPDIF 

1 

D*21 

CP DI FLAGS 



Values Defined in DTFCPDIF 


40 

01 

DTFRPSXC 

DTFRPSXS 



RPS CP/DI EXTENSION CREATED 

RPS CP/DI SUPPORTED 

r 

2B 


1 

DX22 

UNREFERENCED 

\ 

V, 

2C 

DTFFLG5 

1 

D*23 

DTF FLAGS 



Values Defined in DTFFLG5 


80 

DTFCPIN 

40 

DTFSDRPS 

20 

DTFCPFP 

20 

DTFPHSV3 

10 

DTFCP2I 

10 

DTFVAROU 

08 

DTFPHSMO 

04 

DTFCPLP 

02 

DTFGVIOA 

2D 

DTFIOA1 

30 

DTFULADR 


INPUT FILE FOR DTFCP 
INDIC DEVICE SUPPORTS RPS 
FIRST PASS INDICATOR FOR DTF CP 
VERSION 3 INDICATOR PH SEQUENTIAL 
TWO 10 AREAS FOR DTFCP 
VARIABLE OUTPUT FILE FOR DTFSD FEOVD 
DTFPH OPEN BY SPACE MANAGEMENT 
SYSLST OR SYSPCH FOR DTFCP 
IOAREA(S) GETVISED 

ADDRESS OF 10 AREA 1, AND 10 AREA 2 FOR DTFCP 
VTOC ADDRESS OF USER LABELS 


Values Defined in DTFULADR 7 

20 DTFDIV3 VERSION 3 INDICATOR FOR DTFCP & DTFDI 
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DTFSD 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

34 

DTFLHLIM 

2 


ZEROS FOR FBA 

36 

DTFULPBN 

4 


EXTENT UL PBN 

3A 

DTFSKADR 



ZEROS FOR FBA 

3A 

DTFNKSKA 

1 

DX24 

WORKFILE SEEK ADDRESS 

3B 


1 

D*25 

UNREFERENCED 

3C 

DTFLPBNR 



PHYSICAL POSITION OF CURRENT LOGICAL BLOCK 

3C 

DTFLLPBN 



EXTENT LL PBN 

3C 

DTFNKRNO 

1 

D*26 

RECORD NUMBER FOR WORKFILE 

3D 

DTFWKLMS 

1 

D*27 

WORKFILE LOGIC MODS SW 

Values Defined 

in DTFWKLMS 

80 

DTFWKWT1 



FIRST WRITE-WRKFL 

40 

DTFWRUPD 



WRITE UPDATE INDICATOR 

20 

DTFNPNTS 



POINTS INDICATOR 

02 

DTFWXTCL 



EXTENT NEEDED AT CLOSE 

3E 

DTFWBKSZ 



MAXIMUM BLOCK SIZE 

3E 

DTFSRCH1 

1 

DX28 

1ST H OF CCHH CKD SEARCH ARGUMENT 

3F 


1 

DX29 

UNREFERENCED 

40 

DTFRECNO 

1 

D*30 

RECORD NUMBER 

41 

DTFEOFAD 


DX31 

INPUT - EOF ADDRESS 

41 


1 


UNREFERENCED 

42 

DTFRECSZ 

2 


BUCKET TO SAVE RECSIZE REGISTER FOR OUTPUT 

44 

DTFCTRLF 

1 

D*32 

CONTROL FIELD 

Values Defined 

in DTFCTRLF 

80 

DTFWEADR 



UNREFERENCED 

40 

DTFNEIGN 



ERROPT = IGNORE - WORK FILE 

20 

DTFWFUNB 



RECFORM = FIXNUB - WORK FILE 

10 

DTFWVYES 



VERIFY = YES WORKFILE 

08 

DTFWESKP 



ERROPT = SKIP WORKFILE 

45 

DTFWERAD 

3 


USER ERROR ROUTINE ADDRESS 

48 

DTFRECTK 

1 

D*33 

UNREFERENCED 

49 

DTFFLG6 

1 

DX34 

DTF FLAGS 

Values Defined 

in DTFFLG6 

80 

DTFENTB4 



NOT FIRST ENTRY 

20 

DTFORTCL 



OUTPUT-EXTENT NEEDED AT CLOSE 

20 

DTFPBLK 



LOGIC MODS - PARTIAL BLOCK TO BE WRITTEN 

10 

DTFSKIPR 



FIXED OUTPUT - SKIP THIS RECORD 

10 

DTFTRUNR 



FIXED INPUT - TRUNCATE REQUEST 

08 

DTFUEOX 



UPDATE-END OF EXTENT 

08 

DTFNXTCL 



NEW XTNT REQUIRED BY CLOSE 

04 

DTFTRNSP 



TRUNC NOT SPECIFIED 

04 

DTFBFLO 



VARIABLE - BLOCK OVERFLOW 

02 

DTFPUTTD 



INPUT - PUT UPDATE OUTSTANDING 

01 

DTFCIOFL 



VARIABLE - Cl OVERFLOW 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 


4A 

DTFBLKSZ 

2 


BLKSIZE-1 SD DATAFILE 


4C 

DTFLLADR 



CCHHR OF LOW LIMIT 


4C 

DTFLOLIM 



LL PBN 


4C 


2 

DX35 

UNREFERENCED 


4E 

DTFL0LH1 

1 

D*36 

1ST H OF CCHH CKD L0WLIM FIELD 


4F 


1 

D*37 

UNREFERENCED 


50 

DTFRCNUM 

1 

DX38 

RECORD NUMBER 


51 

DTFWLRRT 



INPUT-ADDRESS OF USER WLR RETURNED 

51 

DTFFLG7 

1 

DX39 

OUTPUT-FLAG BYTE 


Values Defined in DTFFLG7 


80 

40 

DTFCFEOV 

DTFFEOVD 



CONSECUTIVE FEOVDS DETECTED 
OUTPUT - FEOVD 


52 

DTFTKCAP 



OUTPUT - TRACK CAPACITY 


52 

DTFCPDTL 

2 


DATA LENGTH FOR DTFCP 


54 

DTFIOREG 



LOAD I/O REGISTER INSTRUCTION 


54 


1 

DX40 

MNEMONIC OF INSTRUCTION (47 OR 

58) 

55 

DTFIORGS 

1 

DX41 

RR FIELD OR INSTRUCTION 


56 


1 

DX42 

UNUSED 


57 

DTFIOADS 

1 

D*43 

RELATIVE DISPLACEMENT IN DTF OF 

IOAREA ADDRESS 

58 

DTFAVAIL 

4 


ADDRESS OF AVAILABLE IO AREA 


5C 

DTFLOGRS 

4 


LOGICAL RECORD SIZE 


60 

DTFIEND 

4 


INPUT-AREA FOR SAVING RECORD 
LENGTH - OUTPUT ADDR OF END OF 

IOAREA 

64 

DTFLGIND 

1 

DX44 

LOGICAL INDICATORS 


Values Defined in DTFLGIND 


80 

40 

20 

10 

08 

04 

04 

02 

01 

DTFDEADR 

DTFDEIGN 

DTFDESKP 

DTFDVYES 

DTF2I0AS 

DTFOUNDL 

DTFWLRER 

DTFFXVUL 

DTFCNTRL 



ERROPT = ADDRESS DATAFILE 

ERROPT = IGNORE DATA FILE 

ERROPT = SKIP DATAFILE 

VERIFY = YES SPECIFIED 

2 IOAREAS SPECIFIED 

OUTPUT - UNDEFINED LENGTH RECORDS 

INPUT - USER HAS WRONG LENGTH ERROR ROUTINE 

1 = FIXED LENGTH RECORDS, 0=VAR OR UNDEFINED 
LENGTH RECORD 

CONTROL PARM SPECIFIED 

65 

DTFDERAD 

3 


USER ERROR ROUTINE ADDRESS - DATAFILE 

68 

DTFSKCCW 



CKD SEEK CCW 


68 

DTFDFSEK 

1 

D*45 

CKD DATA FILE SEEK 


69 


7 

D*46 

UNREFERENCED 


70 


48 

D*47 

UNUSED 112 - 159 
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DTFSD 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

A0 

DTFVOSPR 



SPACE REMAINING IN BUFFER 

A0 


1 

DX48 

UNREFERENCED 

A1 

DTFFLEOX 

3 


EOX RETURNED ADDRESS FOR OUTPUT FIXED LENGTH 

RECORDS USED BY COBOL 

A4 

DTFEOXUL 

1 

DX49 

LABEL NEEDED FOR OVERLAY 

A5 

DTFULEOX 

3 


EOX RETURNED ADDRESS FOR OUTPUT UNDEFINED LENGTH 
RECORDS USED BY COBOL 

A8 


5 

D*50 

UNREFERENCED 

AD 

DTFVLE0X 

3 


EOX RETURNED ADDRESS FOR OUTPUT VARIABLE LENGTH 

RECORDS USED BY COBOL 

B0 

DTFVIRLN 

4 


VARIABLE INPUT - RECORD LENGTH 

B4 

DTFVILRR 



VARIABLE INPUT - INSTRUCTION TO LOAD RECSIZE REG 

B4 

DTFVUPBN 

4 


VARIABLE UPDATE - PBN OF HELD Cl 

B8 

DTFVUNIL 



VARIABLE UPDATE - NOTE ID LAST SEGMENT 

B8 

DTFVUCIL 



VARIABLE UPDATE - RELATIVE Cl OF LAST SEGMENT 

B8 


1 

D*51 

UNREFERENCED 

B9 

DTFCFEOX 

3 


EOX RETURNED ADDRESS FOR OUTPUT FIXED LENGTH RECORDS 
WITH CONTROL SPECIFIED USED BY COBOL 

BC 

DTFVULBL 

2 


VARIABLE UPDATE - LOGICAL BLOCK NUMBER OF LAST SEGMENT 

BE 


10 

D*52 

UNREFERENCED 

C8 

DTFVORLN 

4 


VARIABLE OUTPUT - RECORD LENGTH 

CC 

DTFVOSRR 

4 


VARIABLE OUTPUT - INSTRUCTION TO STORE RECSIZE REG 

DO 

DTFVOFLG 

1 

D*53 

VAR OUTPUT - CONTROL FLAGS 


Values Defined in DTFVOFLG 


20 DTFVOSLS 
10 DTFVOSBT 
08 DTFVOSET 
04 DTFVOSTT 
02 DTFV0SSA 
01 DTFVOSMS 


LEADING SEGMENT 
OUTPUT BLOCK TRUNCATED 
END OF TRACK 
TRACK TRUNCATED 
SAVE DISK ADDRESS 
MULTI-SEGMENT RECORD 


D1 


3 

D*54 

UNREFERENCED 

D4 

DTFVOCNT 



VARIABLE OUTPUT 

D4 


4 

DX55 

UNREFERENCED 

D8 

DTFVURLN 

4 


VARIABLE UPDATE 

DC 

DTFVULRR 



VARIABLE UPDATE 

DC 

DTFVOXST 



VARIABLE OUTPUT 


- COUNT SAVE AREA 

- RECORD LENGTH 

- INSTRUCTION TO LOAD RECSIZE REG 

- EXTENT STATUS SAVE AREA 
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DISP NAME LEN KEY DESCRIPTION 

DC DTFVOXFL 1 D*56 VARIABLE OUTPUT - EXTENT CHANGE FLAGS 

Values Defined in DTFVOXFL 

10 DTFV01VL FIRST VOLUME OF FILE 

08 DTFVOROK REREAD COMPLETED OK 

04 DTFVORRD REREAD IN PROGRESS 

01 DTFVOPEN OUTPUT OPEN IN PROGRESS 

DD DTFVOXSN 1 D*57 VARIABLE OUTPUT - EXTENT SEQUENTIAL NUMBER OF 

NETED RECORDS 

DE DTFVOXS1 1 DX58 VARIABLE OUTPUT - EXTENT SEQUENTIAL NUMBER OF 

1ST EXTENT ON CURRENT VOLUME 

DF DTFVOXOB 1 D*59 VARIABLE OUTPUT - COPY OF OPEN COM BYTE 
Values Defined in DTFVOXOB 

08 DTFVOXNV NEXT EXTENT ON NEW VOLUME 

EO 4 D*60 UNREFERENCED 

E4 DTFVUNI1 VARIABLE UPDATE - NOTED ID OF 1ST SEGMENT 

E4 DTFVUCI1 4 VARIABLE UPDATE - RELATIVE Cl OF 1ST SEGMENT 

E8 DTFVULB1 2 VARIABLE UPDATE - LOGICAL BLOCK NUMBER OF 1ST SEGMENT 

EA 2 D*61 UNREFERENCED 

EC DTFVUXST 1 VARIABLE UPDATE - EXTENT STATUS SAVE AREA 

EC DTFVUXSL 1 D*62 VARIABLE UPDATE - EXTENT SEQUENCE NUMBER OF LAST SEGMENT 

ED DTFVUXS1 1 D*63 VARIABLE UPDATE - EXTENT SEQUENCE NUMBER OF 1ST SEGMENT 

EE DTFVUXFL 1 D*64 VARIABLE UPDATE - FLAGS 

Values Defined in DTFVUXFL 

80 DTFVUXSH A SPANNED 1ST SEGMENT IS HELD 

08 DTFVUXLD DUMMY EXTENT MODE FOR LAST SEGMENT 

04 DTFVUX1D DUMMY EXTENT MODE FOR FIRST SEGMENT 

EF 1 D*65 UNREFERENCED 

THESE DECLARES ARE OVERLAYS FOR FIELDS IN DTFSD VARIABLE DATA FILES WHERE 
BOUNDARY ALIGNMENTS WOULD CAUSE OVERLAP IF THE LABELS WERE INSERTED IN 
LINE. 

A4 DTFVOLAY 

A4 DTFVOCIC 2 VARIABLE OUTPUT - REMAINING Cl CAPACITY 

A8 DTFVOLVB 4 VARIABLE OUTPUT - INSTRUCTION TO LOAD VARBLD REG 

AC 3 UNREFERENCED 

D4 DTFVONID VARIABLE OUTPUT - NOTE ID 

D4 DTFVOCID 4 VARIABLE OUTPUT - RELATIVE Cl PART OF NOTE ID 

D8 DTFVOLBN 2 VARIABLE OUTPUT - LOGICAL BLOCK NUMBER IN NOTE ID 

24 DTFDAEXR ADDRESS OF DA XTNT EXIT INFORMATION RTN 

24 1 UNREFERENCED 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

25 

DTFDAEER 

3 


DTFPH MOUNT=ALL XTNT EXIT POINTER 

THIS 

DECLARE IS 

AN 

OVERLAY FOR FIELDS IN DTFSD WORKFILES. 

28 

DTFWKEXT 



WORKFILE UL/LL PBN 

28 

DTFWKRLT 

2 


RECORD LENGTH 

2A 

DTFWKLLI 

4 


INIT EXTNT LL PBN 

2E 

DTFWKLLC 

4 


CURRENT EXTNT LL PBN 

32 

DTFWKULC 

4 


CURRENT EXTNT UL PBN 

36 


2 


UNUSED 

38 

DTFWPBNR 



POSITION IN FILE 

38 

DTFWKSRH 



SEARCH ADDRESS 

38 

DTFWPBCC 

2 


CC FIELD OF SEARCH ADDRESS 

3A 

DTFWPBHH 

2 


HH FIELD OF SEARCH ADDRESS 

3C 

DTFWKSRR 

1 


RECORD NUMBER OF SEARCH ADDRESS 

END 

OF DTFSD WORKFILE i 

OVERLAY 

20 

DTFTPSD 



DTFSD DTF TYPE INDICATOR 

21 

DTFTPPH 



DTFPH DTF TYPE INDICATOR 

22 

DTFTPDA 



DTFDA DTF TYPE INDICATOR 

23 

DTFTPPHM 



DTFPH-MNTF = ALL 

30 

DTFTPCP1 



DTFCP DISK OMITTED DTF TYPE INDICATOR 

32 

DTFTPCP3 



DTFCP DISK = YES DTF TYPE INDICATOR 

33 

DTFTPDI 



DTFDI DTF TYPE INDICATOR 

C6 

DTFEOFPH 



DTFPH EOF INDICATOR 

CKD 

CONTROL FACTOR 

OVERLAY 

44 

DTFCTRL 



CKD CONTROL FACTOR 

44 

DTFCTRLC 

2 


CONTROL FACTOR CC 

46 

DTFCTRLH 

2 


CONTROL FACTOR HH 

CKD 

CURRENT SYSFIL 

DIB 

ADDRESS OVERLAY 

3A 

DTFCDIBA 

7 


CKD CURRENT DIB ADDRESS BBCCHHR 

CKD 

CP/DI SEEK 

OVERLAY 


58 

DTFCPDIS 

i 


CKD CP/DI SEEK 


WORKFILE LOWER/UPPER HEAD LIMIT OVERLAY 
26 DTFWKLMT 

26 DTFWKLLL 1 WORKFILE LOWER HEAD LIMIT 
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DISP NAME LEN KEY DESCRIPTION 


27 

DTFWKLUL 

1 

WORKFILE UPPER HEAD LIMIT 

LOWER 

HEAD LIMIT 

AND 

UPPER PBN LIMIT OVERLAY 

34 

DTFLOWHL 

2 

LOWER HEAD LIMIT 

36 

DTFPBNUL 

4 

UPPER PBN LIMIT 

DTFDA DESCRIPTOR STRING DISPLACEMENT/TRACK 

CONSTANTS/SIX BASIC CCWS OVERLAY 

4E 

DTFDAOVY 


DTFDA DTF OVERLAY 

4E 

DTFDADSD 


DTFDA DESCRIPTOR STRING FIELD 

4E 

DTFDADRI 

1 

DISPLACEMENT TO READID STRING 

4F 

DTFDADRK 

1 

DISPLACEMENT TO READ KEY STRUCTURE 

50 

DTFDADWI 

1 

DISPLACEMENT TO WRITE ID STRUCTURE 

51 

DTFDADWK 

1 

DISPLACEMENT TO WRITE KEY ST 

52 

DTFDADWO 

1 

DISPLACEMENT TO WRITE RZERO 

53 

DTFDADWA 

1 

DISPLACEMENT TO WRITE AFTER 

54 

DTFDATKC 

2 

DTFDA TRACK CONSTANT 

56 

DTFDARIC 

2 

DTFDA RECORD CONSTANT 

58 


2 

FILLER 

5A 

DTFDASUL 


USER LABEL SAVE AREA 

5A 

DTFDASYM 

1 

SYMBOLIC UNIT 

5B 


1 

BIN# (NOT USED) 

5C 

DTFDAULA 

4 

USER LABEL DASD ADDRESS 

60 

DTFDACCW 


6 BASIC CCWS OVERLAY 

60 


6 

UNREFERENCED 

66 

DTFDAKLN 

2 

KEY LENGTH FIELD 

68 


24 

3RD - 5TH BASIC CCW 

80 


4 

UNREFERENCED 

84 

DTFDACC6 

1 

FLAG FOR 6TH CCW 

85 


3 


88 


2 

UNREFERENCED CCWS 

A8 


6 

UNREFERENCED 

AE 

DTFDAMRS 

2 

MAXIMUM RECORD SIZE FIELD 
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CROSS REFERENCE (Name Piso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DTFACPT 

0002 

10 

DTFDEVTP 

001D 

t 9 

DTFAVAIL 

0058 

9 9 

DTFDFSEK 

0068 

# # 

DTFBFLO 

0049 

04 

DTFDIV3 

0030 

20 

DTFBLHLD 

0010 

10 

DTFDQEXT 

0010 

80 

DTFBLKFL 

0015 

40 

DTFDUMEX 

0026 

01 

DTFBLKSZ 

004A 

9 9 

DTFDVYES 

0064 

10 

DTFCCB 

0000 

00 

DTFENTB4 

0049 

80 

DTFCCW 

0009 

9 , 

DTFEOEXT 

0010 

01 

DTFCCWA 

0008 

# # 

DTFEOF 

0002 

40 

DTFCDIBA 

003A 

t 9 

DTFEOFAD 

0041 

• • 

DTFCFEOV 

0051 

80 

DTFEOFPH 

00C6 

• # 

DTFCFEOX 

00B9 

m # 

DTFEOXUL 

00A4 

# 9 

DTFCIOFL 

0049 

01 

DTFEXBYP 

0027 

80 

DTFCNTRL 

0064 

01 

DTFFEOV 

0027 

40 

DTFCOUNT 

0000 

9 9 

DTFFEOVD 

0051 

40 

DTFCPDIF 

002A 

9 9 

DTFFLEOX 

00A1 


DTFCPDIS 

0058 

9 9 

DTFFLG1 

0010 


DTFCPDTL 

0052 

9 9 

DTFFLG2 

0015 


DTFCPFP 

002C 

20 

DTFFLG3 

0026 


DTFCPIN 

002C 

80 

DTFFLG5 

002C 


DTFCPLP 

002C 

04 

DTFFLG6 

0049 


DTFCP2I 

002C 

10 

DTFFLG7 

0051 


DTFCSW 

0004 


DTFFLNML 

0028 


DTFCTRL 

0044 


DTFFMT1R 

0023 


DTFCTRLC 

0044 


DTFFXVUL 

0064 

02 

DTFCTRLF 

0044 


DTFF1ADD 

001E 


DTFCTRLH 

0046 


DTFF1ADR 

0020 


DTFDAAFT 

0015 

io 

DTFGVIOA 

002C 

02 

DTFDACCW 

005C 

60 

DTFIDXSQ 

0021 


DTFDACC6 

0084 


DTFIEND 

0060 


DTFDADRI 

004E 


DTFIF1SQ 

0022 


DTFDADRK 

004F 


DTFIGNOP 

0010 

20 

DTFDADSD 

004E 


DTFIHDRL 

0026 

02 

DTFDADWA 

0053 


DTFINCL 

0004 

40 

DTFDADNI 

0050 


DTFINPUT 

0015 

02 

DTFDADNK 

0051 


DTFIOADS 

0057 


DTFDADWO 

0052 


DTFIOA1 

002D 


DTFDAEER 

0025 


DTFIOREG 

0054 


DTFDAEXR 

0024 


DTFIORGS 

0055 


DTFDAFSU 

001E 


DTFIRTCL 

0026 

04 

DTFDAKLN 

0066 


DTFLGIND 

0064 


DTFDAMRS 

00AE 


DTFLGMDA 

0009 

io 

DTFDAOUT 

0015 

80 

DTFLGMOD 

0011 


DTFDAOVY 

004E 


DTFLHLIM 

0034 


DTFDARIC 

0056 


DTFLLADR 

004C 


DTFDARPS 

0020 

40 

DTFLLPBN 

003C 


DTFDARTA 

0028 


DTFLOGRS 

005C 


DTFDASCH 

0015 

20 

DTFLOLH1 

004E 


DTFDASUL 

005A 


DTFLOLIM 

004C 


DTFDASYM 

005A 


DTFLOWHL 

0034 


DTFDATKC 

0054 


DTFLPBNR 

003C 


DTFDAULA 

005C 


DTFLSTVL 

0027 

20 

DTFDAULI 

0010 

80 

DTFLU 

0007 


DTFDAULR 

0021 

. , 

DTFNAME 

0016 


DTFDAUND 

0015 

04 

DTFNENVL 

0026 

08 

DTFDAVER 

0015 

40 

DTFNOEXT 

0026 

80 

DTFDAXTN 

0020 

01 

DTFNRCF 

0002 

04 

DTFDAXXR 

0024 


DTFNXTCL 

0049 

08 

DTFDCH1 

0002 

80 

DTFODXSQ 

0027 

, , 

DTFDCH2 

0002 

10 

DTFOHDRL 

0026 

10 

DTFDEADR 

0064 

80 

DTFOPEN 

0015 

04 

DTFDEIGN 

0064 

40 

DTFORTCL 

0049 

20 

DTFDERAD 

0065 

• • 

DTFOUNDL 

0064 

04 

DTFDESKP 

0064 

20 

DTFOXTCL 

0026 

40 

LY24-5221 

Cc) 

Copyright IBM Corp. 

1986 


DTFPBLK 

0049 

20 

DTFVOPEN 

00 DC 

01 

DTFPBNUL 

0036 

9 9 

DTFVORLN 

00C8 


DTFPHEOF 

001E 

9 9 

DTFVOROK 

0 0 DC 

08 

DTFPHMV3 

0020 

20 

DTFVORRD 

OODC 

04 

DTFPHSMO 

002C 

08 

DTFVOSBT 

00D0 

10 

DTFPHSV3 

002C 

20 

DTFVOSET 

00D0 

08 

DTFPLU 

0006 

01 

DTFVOSLS 

00D0 

20 

DTFPRTLB 

0026 

20 

DTFVOSMS 

00D0 

01 

DTFPUTTD 

0049 

02 

DTFVOSPR 

00A0 

9 9 

DTFRCNUM 

0050 

# 9 

DTFVOSRR 

OOCC 

9 9 

DTFRECNO 

0040 

, # 

DTFVOSSA 

00D0 

02 

DTFRECSZ 

0042 

9 m 

DTFVOSTT 

00D0 

04 

DTFRECTK 

0048 

9 9 

DTFVOXFL 

OODC 

9 9 

DTFRPSXC 

002A 

40 

DTFVOXNV 

OODF 

08 

DTFRPSXS 

002A 

01 

DTFVOXOB 

OODF 


DTFSDRPS 

002C 

40 

DTFVOXSN 

OODD 


DTFSKADR 

003A 

9 9 

DTFVOXST 

OODC 


DTFSKCCH 

0068 

# 9 

DTFVOXS1 

OODE 


DTFSKIPR 

0049 

10 

DTFV01VL 

OODC 

io 

DTFSNLEO 

0028 

, , 

DTFVUCIL 

00B8 


DTFSPAND 

0010 

02 

DTFVUCI1 

O0E4 


DTFSPECL 

0010 

40 

DTFVULBL 

OOBC 


DTFSRCH1 

003E 


DTFVULB1 

00E8 


DTFTKCAP 

0052 


DTFVULRR 

OODC 


DTFTLCL 

0026 

02 

DTFVUNIL 

00B8 


DTFTPCP1 

0030 


DTFVUNI1 

00E4 


DTFTPCP3 

0032 


DTFVUPBN 

00B4 


DTFTPDA 

0022 


DTFVURLN 

00D8 


DTFTPDI 

0033 


DTFVUXFL 

OOEE 


DTFTPPH 

0021 


DTFVUXLD 

OOEE 

08 

DTFTPPHM 

0023 


DTFVUXSH 

OOEE 

80 

DTFTPSD 

003C 

20 

DTFVUXSL 

00 EC 

9 9 

DTFTRAF 

0002 

80 

DTFVUXST 

00 EC 

9 m 

DTFTRANS 

0002 


DTFVUXS1 

OOED 

• • 

DTFTRLBL 

0010 

04 

DTFVUX1D 

OOEE 

04 

DTFTRNSP 

0049 

04 

DTFWBKSZ 

003E 

, , 

DTFTRUNR 

0049 

10 

DTFWEADR 

0042 

80 

DTFTYPC 

0006 

• • 

DTFNEIGN 

0042 

40 

DTFTYPE 

0014 

# # 

DTFWERAD 

0045 

, . 

DTFTYPLU 

0006 

• • 

DTFWESKP 

0042 

08 

DTFUE 

0004 

01 

DTFWFUNB 

0042 

20 

DTFUEOF 

0026 

10 

DTFWKDLT 

0015 

40 

DTFUEOX 

0049 

08 

DTFNKEXT 

0028 

9 9 

DTFULADR 

0030 

9 9 

DTFWKFID 

0025 

04 

DTFULEOX 

00A5 

9 9 

DTFWKLLC 

002E 


DTFULPBN 

0036 

9 # 

DTFNKLLI 

002A 


DTFULRTN 

0029 

9 9 

DTFNKLLL 

0026 


DTFUNRC 

0002 

20 

DTFWKLMS 

003D 


DTFUPDAT 

0026 

40 

DTFWKLMT 

0026 


DTFUSRLB 

0015 

01 

DTFWKLUL 

0027 


DTFVAROU 

002C 

10 

DTFWKNWV 

0025 

08 

DTFVERR 

0002 

02 

DTFWKOCF 

0025 


DTFVER2 

0015 

08 

DTFHKPTO 

0015 

io 

DTFVILRR 

00B4 


DTFWKRLT 

0028 


DTFVIRLN 

00B0 


DTFNKRNO 

003C 


DTFVLEOX 

OOAD 


DTFNKRPS 

0025 

40 

DTFVOCIC 

00A4 


DTFNKSEQ 

0024 


DTFVOCID 

00D4 


DTFWKSKA 

003A 


DTFVOCNT 

00D4 


DTFWKSRH 

0038 


DTFVOFLG 

00D0 


DTFWKSRR 

003C 


DTFVOLBN 

00D8 


DTFWKTKC 

001E 


DTFVOLNO 

0024 


DTFNKULC 

0032 


DTFVOLVB 

00A8 


DTFNKV3 

0025 

20 

DTFVONID 

00D4 


DTFWKHT1 

003D 

80 


DTFSD 
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DTFWKXTD 0025 02 
DTFWKXTF 0025 10 
DTFWLRER 0064 04 
DTFWLRRT 0051 .. 


DTFWORKA 0015 10 
DTFWPBCC 0038 ... 
DTFWPBHH 003A .. 
DTFWPBNR 0038 .. 


DTFWPNTS 003D 20 
DTFWRKFL 0015 20 
DTFWRUPD 003D 40 
DTFHTKCP 001E .. 


DTFWVYES 0042 10 
DTFWXTCL 003D 02 
DTF1052 0026 04 
DTF2I0AS 0064 08 
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DTFX: DIE EXTENSION 

DTFX describes the fields in the DTF extension. DTFX is used in the CMS/DOS 
environment. DTFX is invoked via the DTFX macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

B0 

B8 

CO 

C8 

DO 

D8 

E0 

E8 

F0 


DTFXIDEN 

DTFXCBRC | DTFXCBTI 

DTFXCBST | DTFXCBTC | 

DX1 

DTFXCCWA 

D*2 

DTFXCWCS j 

DX3 

DTFXRBPT 

///////////////////// 

| ///////////////////// 

DTFXRSV1 

D*4 

DTFXFBLP 

D*5 

DTFXFBUP 

D*6 

DTFXC1LP 

DX7 

DTFXC1UP 

D*8 

DTFXD1LP 

D*9 

DTFXD1UP 

D*10 

DTFXE1LP 

DXH 

DTFXE1UP 

D*12 

D*13| D*14| D*15 

DTFXDUMY 

DTFXFBAO 

DTFXDTF 

DTFXNDTF 

DTFX0RSP 

DTFXXLEN 

D*16 

DTFXOCWP 

DTFXCISZ 

DX17 

DTFXLMPT 


DTFXLMSA 


DTFXFBAB 

D*18| /////////////// 

DTFXCCNP 

DTFXMSWA 

DTFXSMWP 

DTFXERXT 

DTFXULLX 

DTFXULUX 

DTFXI0A1 

DTFXSIOl 

DTFXSI02 

DTFXBLSZ 

///////////////////////////////////////////// | 

DTFXCIIP 

DTFXCI1C 

DTFXCI1H 

DX19| /// | DX2o| DX21 

DTFXCINC 

DTFXCINH 


DTFX 
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F8 

100 

108 

110 

118 

120 

128 

130 

138 

140 

148 

150 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

DTFXIDEN 

8 

EYE CATCHER 

8 

DTFXCCB 


I0RB IN DTF EXTENSION 

8 

DTFXCCBI 


CCB IN IORB 

8 

DTFXCBRC 

2 

RESIDUAL COUNT 

A 

DTFXCBTI 

2 

TRANSMISSION INFORMATION 

Values Defined in DTFXCBTI 

80 

DTFXTRAF 


TRAFFIC BIT 

C 

DTFXCBST 

2 

STATUS BITS 

E 

DTFXCBTC 

2 

TYPE CODE 

Values Defined in DTFXCBTC 

08 

04 

DTFXECBI 

DTFXIORB 


ECB POINTER IS PRESENT 
IORB INDICATOR 

10 

DTFXCBLI 

1 DX1 

LIOCS BITS 

11 

DTFXCCWA 

3 

CCW POINTER 

14 

DTFXCBPI 

1 D*2 

PIOCS BITS 

15 

DTFXCWCS 

3 

CCW IN CSW 

18 

DTFXIOFL 


FIX LIST POINTER 

18 

DTFXRBFL 

1 DX3 

IORB FLAGS 

19 

DTFXRBPT 

3 

FIX LIST POINTER 


D*22| DX23 
DTFXRLEN 


DTFXCI11 

DTFXLBLN 


DTFXLCBC 

DTFXIOAD 

DTFXRCIN 

D*3lJ DX32 
DTFXRCIC 


DTFXSSPR 


D*24 


DX27J D*28 
DTFXNRDF 


D*25| DX26 
DTFXNLBO 


D*29| D*30 
DTFXLBRD 
DX33T D*34 


DTFXEXFR 


DTFXFXLC 


DTFXFXLH 


I 


DTFXFXUC 


DTFXFXUH 


DX35 


DTFXRELL 


cont. 

DTFXHRBA 

DTFXCISB 

DX36 

cont. 

DTFXTPC 

DTFXTPCl 

DTFXCIM4 

D*37 

cont. 

DTFXSSRW 

DTFXLHH 

D*38 


cont. 
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DTFX 


DI$P 

NAME 

LEN 

KEY 

DESCRIPTION 

IC 


4 


RESERVED 

20 


4 


PTR TO CCB FOR WAIT POSTING 

24 

DTFXRSV1 

4 


RESERVED FOR IORB EXPANSION 

28 

DTFXFLS1 



FIX LIST 1 

28 

DTFXFLB1 



IORB FIX LIST 

28 

DTFXFBLF 

1 

D*4 

LOWER FLAG 

29 

DTFXFBLP 

3 


LOWER IORB POINTER 

2C 

DTFXFBUF 

1 

D*5 

UPPER FLAG 

2D 

DTFXFBUP 

3 


UPPER IORB POINTER 

30 

DTFXFLC1 



CCW FIX LIST 

30 

DTFXC1LF 

1 

D*6 

LOWER FLAG 

31 

DTFXC1LP 

3 


LOWER CCW POINTER 

34 

DTFXC1UF 

1 

D*7 

UPPER FLAG 

35 

DTFXC1UP 

3 


UPPER CCW POINTER 

38 

DTFXFLD1 



DATA AREA FIX LIST 1 

38 

DTFXD1LF 

1 

D*8 

LOWER FLAG 

39 

DTFXD1LP 

3 


LOWER DATA POINTER 

3C 

DTFXD1UF 

1 

D*9 

UPPER FLAG 

3D 

DTFXD1UP 

3 


UPPER DATA POINTER 

40 

DTFXFLE1 



ECB FIX LIST 1 

40 

DTFXE1LF 

1 

DX10 

LOWER FLAG 

41 

DTFXE1LP 

3 


LOWER ECB POINTER 

44 

DTFXE1UF 

1 

DXll 

UPPER FLAG 

45 

DTFXE1UP 

3 


UPPER ECB POINTER 

48 

DTFXFLG1 



FLAG BYTES 

48 

DTFXFLF1 

1 

D*12 

END OF FIX LIST 

49 

DTFXFL10 

1 

D*13 

SSR CONTROL FLAGS 


Values Defined in DTFXFL10 


80 DTFXSSHD 
40 DTFXSSLC 
20 DTFXSSFT 
10 DTFXSSFW 
08 DTFXRPS 
04 DTFXNHRB 
02 DTFX1411 
01 DTFXNOMT 


HOLD = YES SPECIFIED IN DTF 
SSR TO OPERATE IN LOCATE 
SSR FIRST ENTRY TAKEN 
FORCED WRITES REQUIRED 
RPS DEVICE 

DON 1 T UPDATE HIGH RBA 
DEVICE IS A 2311 OR 2314 

MULTI-TRACK READ COUNT AHEAD NOT TO BE DONE 
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DISP NAME LEN KEY DESCRIPTION 


4A DTFXFL20 1 D*14 CCW INITIALIZATION STATE 
Values Defined in DTFXFL20 

80 DTFXCCRD CCWS INITIALIZED FOR READ 

40 DTFXCCWT CCWS INITIALIZED FOR FORMATTED WRITE 

20 DTFXCCWU CCWS INITIALIZED FOR UNFORMATTED WRITE 

10 DTFXCCRC CCWS INITIALIZED FOR READ COUNT 

4B DTFXFL30 1 D*15 MORE FLAGS 

Values Defined in DTFXFL30 

80 DTFXSSSK ERROPT = SKIP FOR DTFSD 

40 DTFXSSIG ERROPT = IGNORE FOR DTFSD 

20 DTFXERNM ERROPT = NAME FOR DTFSD 

10 DTFXWORK WORKA = YES FOR DTFSD 

08 DTFXTRNC TRUNCS = YES SPECIFIED 

04 DTFXUPDT UPDATE = YES SPECIFIED 

02 DTFXNIOA NO IOAREAS SPECIFIED 

01 DTFXVYES VERIFY = YES SPECIFIED FOR DTFSD - ALWAYS ON FOR CP 

4C DTFXDSAP POINTER TO DSA 

4C DTFXDUMY 4 DUMMY TO GET DSAP GENNED 

50 DTFXFBAO 4 FbA OPEN POINTER 

54 DTFXDTF 4 POINTER TO OLD DTF 

58 DTFXNDTF 4 POINTER TO NEXT IN DTF LIST 

5C DTFXORSP 4 POINTER TO OPEN SAVE AREA 

60 DTFXXLEN 4 LENGTH OF THIS EXTENSION 

64 DTFXOCCW POINTER TO OLD CCW 

64 DTFXSFSW 1 D*16 SYSFIL SWITCH 

Values Defined in DTFXSFSW 

80 DTFXIOPT IOPTR SPECIFIED IN DTFCP 

40 DTFXFRVS FREEVIS DTFEXTEN 

20 DTFXMECP MULTIPLE EXTENT CP IS ALLOWED 

65 DTFXOCWP 5 OLD CCW POINTER 

68 DTFXCISZ 4 Cl SIZE IN BYTES 

6C DTFXLMSP POINTER TO OLD LOGIC MOD 

6C DTFXLMSW 1 D*17 FLAGS 

Values Defined in DTFXLMSW 

80 DTFXCPCP THIS IS FOR DTFCP 

40 DTFXSDSD THIS IS FOR DTFSD 

20 DTFXDIDI THIS IS FOR DTFDI 

10 DTFXSDWF DTFSD TYPE = WORKFILE 

08 DTFXVER3 DTF IS VERSION 3 

04 DTFXSPRO SPANNED RECORD FILE REOPEN REQUEST 

02 DTFXCEOX COBOL EOX TAKEN 

01 DTFXRSVD NOT USED 

6D DTFXLMPT 3 POINTER TO OLD LOGIC MOD 

70 DTFXLMSA 64 LOGIC MOD SAVEAREA 
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PISP NAME LEN KEY DESCRIPTION 

BO DTFXFBAB 4 FBA BLOCKSIZE OR PHYSICAL RECORD SIZE FOR CKD 

B4 DTFXODVT 1 D*18 DEVICE TYPE 

B5 3 RESERVED 


B8 

DTFXCCWP 

4 

POINTER TO CCW WORK AREA 

B8 

DTFXDEOC 

1 

OP CODE 

B8 

B8 

DTFXCCWW 

DTFXCCWS 


FBA CCW STRING 

B8 

DTFXDFX1 


DEFINE EXTENT CCW 

B9 

DTFXDEXP 

3 

EXTENT POINTER 

BC 

DTFXMSWA 

4 

POINTER TO MAP STRING WORK AREA 

BC 

DTFXDECF 

1 

CHAINING FLAGS 

BD 

DTFXDERS 

1 

RESERVED 

BE 

DTFXDEBC 

2 

BYTE COUNT 

CO 

DTFXLOC1 


LOCATE CCW 

CO 

DTFXSMWP 

4 

POINTER TO SPACE MANAGEMENT WORK AREA 

CO 

DTFXLOOC 

1 

OP CODE 

Cl 

DTFXLOLP 

3 

LOCATE LIST POINTER 

C4 

DTFXERXT 

4 

ERROPT = ADDRESS ADDR 

C4 

DTFXLOCF 

1 

CHAINING FLAGS 

C5 

DTFXLORS 

1 

RESERVED 

C6 

DTFXLOBC 

2 

BYTE COUNT 

C8 

DTFXRWCW 


READ/WRITE CCW 

C8 

DTFXULLX 

4 

USER LABEL LOWER EXTENT 

C8 

DTFXRWOC 

1 

OP CODE 

C9 

DTFXRWDP 

3 

DATA POINTER 

CC 

DTFXULUX 

4 

USER LABEL UPPER EXTENT 

CC 

DTFXRWCF 

1 

CHAINING FLAGS 

Values Defined in 

DTFXRWCF 

40 

DTFXCWCN 


COMMAND CHAIN FLAG 

CD 

DTFXRWRS 

1 

RESERVED 

CE 

DTFXRWLN 

2 

LENGTH 

DO 

DTFXVNOP 


NOP CCW 

DO 

DTFXIOA1 

4 

ADDRESS OF USERS I/O AREA 1 

DO 

DTFXVLOC 

1 

OP CODE 

D1 

DTFXVLLP 

3 

DATA POINTER FOR NOP CCW 
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/f 

D4 

DTFXSIOl 

4 


ADDRESS OF I/O AREA 1 SPECIFIED BY USER ON DTF 




D4 

DTFXVLCF 

1 


CHAINING FLAGS 




D5 

DTFXVLRS 

1 


RESERVED 




D6 

DTFXVLBC 

2 


BYTE COUNT 




D8 

DTFXSI02 

4 


ADDRESS OF I/O AREA 2 SPECIFIED BY USER ON DTF 




D8 

DTFXRSV4 

16 


RESERVED FOR CHANNEL PROGRAM EXPANSION 




DC 

DTFXBLSZ 

4 


BLOCKSIZE SPECIFED BY USER ON THE DTF 




EO 


4 


RESERVED 




E4 


4 


RESERVED 




E8 

DTFXXTNT 



DEFINE EXTENT DATA 




E8 

DTFXCI1 



Cl HEADER 




E8 

DTFXCI1P 

4 


Cl BUFFER ADDRESS 




E8 

DTFXXTMB 

1 


MASK BYTE 




E9 

DTFXXRSV 

3 


RESERVED 




EC 

DTFXPBNR 



CURRENT POSITION 




EC 

DTFXCI1B 



PBN OR CCHH OF Cl 




EC 

DTFXCI1C 

2 

1 

CC 




EC 

DTFXXTFB 

4 


FIRST BLOCK ON MEDIA 




EE 

DTFXCI1H 

2 


HH 




FO 

DTFXCI1R 

1 

D*19 

ZERO FOR FBA, PHYSICAL RECORD NUMBER FOR CKD 




FO 

DTFXXTFD 

4 


FIRST BLOCK ON DS 




FI 


1 


RESERVED 




F2 

DTFXCI12 

1 

D*20 

10 PASSBACK FIELD 




Values Defined 

in DTFXCI12 



'v 

80 

DTFXEOXH 



END OF EXTENT 




40 

DTFXIOEH 



I/O ERROR OCCURRED 




20 

DTFXIOWP 



WRITE IN PROGRESS 




10 

DTFXIORP 



READ IN PROGRESS 




08 

DTFXCITL 



LOGICAL BLOCK TOO LONG 




04 

DTFXPONV 



POSITION NOT VALID 




02 

DTFXEOFH 



EOF ENCOUNTERED 




F3 

DTFXCI13 

1 

D*21 

Cl STATUS 




Values Defined 

in DTFXCI13 




80 

DTFXFREE 



Cl OR TRACK IS TO BE FREED 




40 

DTFXFWRQ 



FORMATTED WRITE REQUIRED 




20 

DTFXUWRQ 



UNFORMATTED WRITE REQUIRED 




10 

DTFXRETR 



RETRY BEING DONE 




08 

DTFXFORW 



FORCED WRITE BEING DONE 




04 

DTFXVALC 



Cl CONTENTS ARE VALID 




02 

DTFXLSIO 



LAST I/O FOR THE Cl 



MT 

{. 

V 
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F4 

DTFXCI1N 



NEXT POSITION FOR Cl 
FIRST TRACK OF FIRST 

FORMAT 

EXTENT 

CKD 

FOR 

OR CCCH OF 

NON-CI FORMAT Cl 

F4 

DTFXCIN 



PBN OR CCHH OF NEXT 

Cl 



F4 

DTFXCINC 

2 


CC 




F4 

DTFXXTLD 

4 


LAST BLOCK ON DS 




F6 

DTFXCINH 

2 


HH 




F8 

DTFXLOCD 



LOCATE DATA 




F8 

DTFXCINR 

1 

D*22 

R 




F8 

DTFXLCOB 

1 


OPERATION BYTE 




F9 

DTFXCI14 

1 

DX23 

FUNCTION FLAGS 





Values Defined in DTFXCI14 


80 

40 

20 

DTFXSARC 

DTFXMTRQ 

DTFXTRHD 



STAND ALONE READ COUNT REQUESTED 
MULTI-TRACK READ COUNT TO BE DONE 

TRACK IS TO BE HELD ON THIS REQUEST 

F9 

DTFXLCRC 

1 


REPLICATION COUNT 

FA 

DTFXCI11 

2 


CURRENT LOGICAL BLOCK NUMBER 

FA 

DTFXLCBC 

2 


BLOCK COUNT 

FC 

DTFXLCDD 

4 


DATA DISPLACEMENT 

FC 


4 


RESERVED 

SSR INTERFACE 




100 

DTFXRLEN 

2 


REQUESTED DATA LENGTH 

102 

DTFXLBLN 

2 


LOGICAL BLOCK LENGTH 

104 

DTFXIOAD 

4 


LOGICAL BLOCK ADDRESS POINTER 

108 

DTFXSSPR 

4 


POINTER TO SAM SERVICE RTN 

10C 

DTFXRCIR 



FULL NOTE/REPOSITION ID 

10C 

DTFXRLCI 



RELATIVE Cl REPOSITION AND NOTE 

10C 

DTFXNPCK 



EXTENDED NOTE/POINT ARGUMENT DEFINITION 

IOC 

DTFXRLCI 

1 

DX24 

HIGH ORDER BYTE 

IOC 

DTFXNPCC 

2 


CC 

10D 

DTFXRCIN 

3 


RELATIVE Cl NUMBER FOR NOTE ID 

10D 

DTFXNWCC 

2 


CC 

10D 

DTFXNW 



EXTENDED NOTE/POINT ARGUMENT DEFINITION 

10E 

DTFXNPH 

2 


H 

10F 

DTFXNWH 

1 


H 

110 

DTFXSSL1 

1 

D*25 

FIRST BYTE OF LOGICAL BLOCK NUMBER 

110 

DTFXNPR 

1 


R 


DTFX 
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110 

DTFXSSLB 



LOGICAL BLOCK FOR REPOSITION 
FORMAT, REMAINING SPACE FOR 1 
OTHER THAN WORKFILES, OR FOR 

AND NOTE FOR Cl 
NON-CI FORMAT 
NORKFILES 

111 

DTFXSSL2 

1 

DX26 

SECOND BYTE OF LOGICAL BLOCK 

NUMBER 

112 

DTFXSPB1 

1 

DX27 

SSR PASSBACK 



Values Defined in DTFXSPB1 


80 

DTFXEOX 



END OF EXTENT 

40 

DTFXNLBF 



NO LOGICAL BLOCK FOUND 

20 

DTFXREOC 



READ ERROR OCCURRED 

10 

DTFXWEOC 



WRITE ERROR OCCURRED 

08 

DTFXLBTL 



LOGICAL BLOCK TOO LONG 

04 

DTFXSEOF 



SOFTWARE EOF ENCOUNTERED 

02 

DTFXRQCP 



REQUEST COMPLETE 

01 

DTFXBOE 



BEGIN OF EXTENT 

113 

DTFXSPB2 

1 

DX28 

SSR PASSBACK 

Values Defined 

in DTFXSPB2 

80 

DTFXBOF 



BEGIN OF FILE 

40 

DTFXBSL 



BACKSPACE TO BE REISSUED 

20 

DTFXBSLR 



BACKSPACE IN PROGRESS 

114 

DTFXSPR1 

1 

DX29 

PREVIOUS ACTION REQUEST 

115 

DTFXSPR2 

1 

DX30 

PREVIOUS REQUEST 

116 

DTFXSSIC 

1 

DX31 

SSR STATUS 

Values Defined 

1 in DTFXSSIC 

80 

DTFXRPIP 



REPOSITION IN PROGRESS 

40 

DTFXERIP 



ERROR EXIT IN PROGRESS 

20 

DTFXSKEX 



SKIP RETURN FROM ERROR EXIT 

10 

DTFXSCDF 



INITIALIZE CIDF 

08 

DTFXRIOE 



RESUME AFTER 10 ERROR 

04 

DTFXDWCI 



DONT WRITE Cl 

02 

DTFXLMEP 



EXPLICIT FREE REQUEST 

117 

DTFXSSR1 

1 

DX32 

RESERVED 

118 

DTFXNLBO 

2 


NEXT LOGICAL BLOCK OFFSET 

11A 

DTFXNRDF 

2 


NEXT RDF OFFSET 

11C 

DTFXLBRD 

2 


LOGICAL BLOCK WITHIN RDF 

HE 

DTFXRCIC 

2 


REMAINING CI/TRACK CAPACITY 

120 

DTFXEXF 



EXPLICIT FREE ADDRESS 

120 

DTFXEXFR 

4 


EXPLICIT FREE Cl BLOCK NUMBER OR CCHH 

124 

DTFXEXR 

1 

DX33 

R 

125 

DTFXSSOP 

1 

DX34 

SSR OP CODE 

126 


2 


RESERVED SSR WORKFIELD 

128 


4 


RESERVED SSR WORKFIELD 

12C 

DTFXFXLL 



FILE LOWER EXTENT 

12C 

DTFXFXLC 

2 


CC 
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12E 

DTFXFXLH 

2 

HH 

130 

DTFXFXUU 


FILE UPPER EXTENT 


130 

DTFXFXUL 



PBN OF FIRST BLOCK OF LAST Cl IN THE EXTENT OR 
CCHH OF FIRST PHYSICAL RECORD OF LAST Cl 

IN THE EXTENT 

130 

DTFXFXUC 

2 


CC 

132 

DTFXFXUH 

2 


HH 

134 

DTFXFXUR 

1 

DX35 

RECORD NUMBER 

135 

DTFXRELL 

4 


RELATIVE Cl NUMBER OF FIRST Cl IN THIS EXTENT 

139 

DTFXHRBA 

4 


HIGH USED RBA 

13D 

DTFXCISB 

2 


NUMBER BLOCKS PER Cl FOR FBA, PHYSICAL RECORDS 

PER Cl FOR Cl FORMAT CKD 

13F 

DTFXBCM1 



NUMBER BLOCKS PER Cl MINUS 1 

13F 

DTFXPRPT 

2 

DX36 

PHYSICAL RECORDS PER TRACK FOR Cl FORMAT CKD — 
SPACE REQUIRED FPR EOF NON-CI FORMAT CKD 

141 

DTFX2BCI 



TWICE NUMBER BLOCKS PER Cl 

141 

DTFXTPC 

2 


TRACKS PER CYLINDER FOR Cl FORMAT CKD 

143 

DTFX2BM1 



TWICE BLOCKS PER Cl MINUS 1 

143 

DTFXTPC1 

2 


TRACKS PER CYLINDER MINUS 1 FOR Cl FORMAT CKD— 
COUNT/GAP COMPUTATION CONSTANT FOR NON-CI FORMAT 

145 

DTFXCIM4 

2 


CISIZE MINUS 4 BYTES FOR Cl FORMAT-TRACK CAPACITY 
NON-CI FORMAT 

147 

DTFXCIMX 

2 

DX37 

CISIZE MINUS 10 BYTES FOR Cl FORMAT—COUNT/GAP 
OVERHEAD CONSTANT FOR NON-CI FORMAT CKD 

149 

DTFXSSRW 

4 


ADDRESS OF SSR AND LOGIC MODULE WORKAREA 

14D 

DTFXLHH 

2 


LOWER CYLINDER HEAD LIMIT FOR NON-CI CKD, 

0 IF NOT SPLIT CYLINDER 

14F 

DTFXUHH 

2 

D*38 

UPPER CYLINDER HEAD LIMIT FOR NON-CI FORMAT CKD 

THIS 

IS A DESCRIPTION OF THE CCB BLOCK 

8 

CCBST 



START CCB 

8 

CCBD 



COMMAND CONTROL BLOCK 

8 

CCBLEN 

0 


MAP OF THE DOS CCB 

8 

CCBCNT 

2 


RESIDUAL COUNT 

A 

CCBERMAP 

0 


4 BYTES USED TO CHECK ERRORS 


DTFX 
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A 

CCBC0M1 

1 

COMMUNICATIONS BYTE NUMBER 1 

Values Defined 

in 

CCBCOM1 

80 

CCBWAIT 


TRAFFIC BIT (SET AT CE) 

40 

CCBEOF 


END-OF-FILE 

20 

CCBIOERR 


UNRECOVERABLE I/O ERROR 

10 

CCBERROK 


ACCEPT UNRECOVERABLE ERROR 

08 

CCBRDC 


RETURN DATA CHECKS 

04 

CCBPDE 


POST AT DEVICE END 

02 

CCBDCV 


RETURN DATA CHECK RD/CHK 

01 

CCBUERR 


USER ERROR ROUTINE 

B 

CCBC0M2 

1 

COMMUNICATIONS BYTE NUMBER 2 

Values Defined 

in 

CCBC0M2 

80 

CCBDCCNT 


DATA CHECK IN COUNT AREA 

40 

CCBTRKOV 


TRACK OVERRUN 

20 

CCBEOC 


END-OF-CYLINDER 

10 

CCBDC 


DATA CHECK 

08 

CCBNOREC 


NO-RECORD-FOUND 

04 

CCBRETRY 


RETRY NO RECORD FOUND 

02 

CCBVER 


VERIFY ERROR 

01 

CCBCC 


COMMAND CHAIN (RETRY) 

C 

CCBCSW1 

1 

CSW STATUS BIT NUMBER 1 

Values Defined 

in 

CCBCSW1 

80 

CCBATTN 


ATTENTION 

40 

CCBSTMOD 


STATUS MODIFIER 

20 

CCBCUE 


CONTROL UNIT END 

10 

CCBBUSY 


BUSY 

08 

CCBCE 


CHANNEL END 

04 

CCBDE 


DEVICE END 

02 

CCBUC 


UNIT CHECK 

01 

CCBUE 


UNIT EXCEPTION 

D 

CCBCSW2 

1 

CSW STATUS BIT NUMBER 2 

Values Defined 

in 

CCBCSW2 

80 

CCBPCI 


PROGRAM-CONTROLLED INTERRUPT 

40 

CCBILEN 


INCORRECT LENGTH 

20 

CCBPROGM 


PROGRAM CHECK 

10 

CCBPROT 


PROTECTION CHECK 

08 

CCBCHAND 


CHANNEL DATA CHECK 

04 

CCBCHANC 


CHANNEL CONTROL CHECK 

02 

CCBICTRL 


INTERFACE CONTROL CHECK 

01 

CCBCHAIN 


CHAINING CHECK 

E 

CCBSYMU 

0 

SYMBOLIC UNIT (SYSUN) 

E 

CCBSUCLS 

1 

U - LUB CLASS 

F 

CCBSUNUM 

1 

N - LUB NUMBER WITHIN CLASS 

10 

CCBLIOBS 

1 

RESERVED FOR LIOBS 

11 

CCBCCW 

3 

POINTER TO START OF CHANNEL PROGRAM 

14 

CCBC0M3 

1 

COMMUNICATION BYTE NUMBER 3 

Values Defined 

1 in 

CCBC0M3 

40 

CCBAPEND 


APPENDAGE EXIT AT INTERRUPT 

15 

CCBCSW 

3 

PT TO CSW OR PT APPENDAGE RETURN 
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18 

CCBLDATB 

4 

ADDRESS OF LAST 

DATA BLOCK 

1C 

CCBLCCWB 

4 

ADDRESS OF LAST 

CCW BLOCK 

20 


4 

AVAILABLE 


24 

CCBUFLGS 

1 

I/O MANAGER CCB 

FLAGS 


Values Defined in CCBUFLGS 


80 

40 

20 

10 

CCBUEAIC 

CCBUEAC 

CCBURDCW 

CCBRPS 


ERROR ANALYSIS IN CONTROL 

ERROR ANALYSIS COMPLETE 

READ CCW ACTIVE 

RPS CHAN PGM CANDIDATE 

25 

CCBFSCCW 

3 

SAVE AREA FOR FIRST CCW ADDRESS 

28 

CCBRDCCW 

4 

ADDRESS OF FIRST READ CCW 

2C 

CCBWTCCW 

4 

ADDRESS OF FIRST WRITE CCW 

30 

CCBLWCCW 

4 

ADDRESS OF THE LAST WRITE CCW 

34 


12 

AVAILABLE 

40 

CCBNCCB 

4 

ADDRESS OF NEXT CCB BLOCK 

44 


4 

AVAILABLE 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CCBAPEND 

0014 

40 

CCBLCCWB 

001C 


CCBWTCCW 

002C 

# 9 

DTFXCINR 

00F8 


CCBATTN 

oooc 

80 

CCBLDATB 

0018 


DMSCCB 

0008 

9 9 

DTFXCISB 

013D 


CCBBUSY 

oooc 

10 

CCBLEN 

0008 


DTFXBCM1 

013F 

• • 

DTFXCISZ 

0068 


CCBCC 

000B 

01 

CCBLIOBS 

0010 


DTFXBLSZ 

00 DC 

# # 

DTFXCITL 

00F2 

08 

CCBCCW 

0011 

# # 

CCBLWCCW 

0030 


DTFXBOE 

0112 

01 

DTFXCI1 

00E8 


CCBCE 

OOOC 

08 

CCBNCCB 

0040 


DTFXBOF 

0113 

80 

DTFXCI1B 

00 EC 


CCBCHAIN 

000D 

01 

CCBNOREC 

000B 

08 

DTFXBSL 

0113 

40 

DTFXCI1C 

00 EC 


CCBCHANC 

000D 

04 

CCBPCI 

000D 

80 

DTFXBSLR 

0113 

20 

DTFXCI1H 

OOEE 


CCBCHAND 

000D 

08 

CCBPDE 

000A 

04 

DTFXCBLI 

0010 


DTFXCI1N 

00F4 


CCBCNT 

0008 


CCBPROGM 

GOOD 

20 

DTFXCBPI 

0014 


DTFXCI1P 

00E8 


CCBC0M1 

000A 


CCBPROT 

GOOD 

10 

DTFXCBRC 

0008 


DTFXCI1R 

00F0 


CCBC0M2 

000B 


CCBRDC 

000A 

08 

DTFXCBST 

OOOC 


DTFXCI11 

OOFA 


CCBC0M3 

0014 


CCBRDCCW 

0028 

# # 

DTFXCBTC 

000E 


DTFXCI12 

00F2 


CCBCSW 

0015 


CCBRETRY 

000B 

04 

DTFXCBTI 

000A 


DTFXCI13 

00F3 


CCBCSW1 

OOOC 


CCBRPS 

0024 

10 

DTFXCCB 

0008 


DTFXCI14 

00F9 


CCBCSW2 

000D 


CCBST 

0008 

# # 

DTFXCCBI 

0008 


DTFXCPCP 

006C 

80 

CCBCUE 

OOOC 

20 

CCBSTMOD 

OOOC 

40 

DTFXCCRC 

004A 

io 

DTFXCWCN 

OOCC 

40 

CCBD 

0008 

• • 

CCBSUCLS 

000E 


DTFXCCRD 

004A 

80 

DTFXCWCS 

0015 


CCBDC 

000B 

10 

CCBSUNUM 

000F 

# # 

DTFXCCWA 

0011 

# m 

DTFXC1LF 

0030 


CCBDCCNT 

000B 

80 

CCBSYMU 

000E 


DTFXCCWP 

00B8 

# # 

DTFXC1LP 

0031 


CCBDCV 

000A 

02 

CCBTRKOV 

000B 

40 

DTFXCCWS 

OOB8 

# # 

DTFXC1UF 

0034 


CCBDE 

OOOC 

04 

CCBUC 

OOOC 

02 

DTFXCCWT 

004A 

40 

DTFXC1UP 

0035 


CCBE0C 

000B 

20 

CCBUE 

OOOC 

01 

DTFXCCWU 

004A 

20 

DTFXDEBC 

OOBE 


CCBE0F 

000A 

40 

CCBUEAC 

0024 

40 

DTFXCCWW 

00B8 

. , 

DTFXDECF 

OOBC 


CCBERMAP 

000A 

# # 

CCBUEAIC 

0024 

80 

DTFXCEOX 

006C 

02 

DTFXDEOC 

00B8 


CCBERROK 

000A 

10 

CCBUERR 

000A 

01 

DTFXCIMX 

0147 


DTFXDERS 

OOBD 


CCBFSCCW 

0025 

# # 

CCBUFLGS 

0024 

m # 

DTFXCIM4 

0145 


DTFXDEXP 

00B9 


CCBICTRL 

000D 

02 

CCBURDCW 

0024 

20 

DTFXCIN 

OOF4 


DTFXDFX1 

00B8 


CCBILEN 

000D 

40 

CCBVER 

000B 

02 

DTFXCINC 

OOF4 


DTFXDIDI 

006C 

20 

CCBIOERR 

000A 

20 

CCBWAIT 

000A 

80 

DTFXCINH 

00F6 


DTFXDSAP 

004C 
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DTFXDTF 

0054 

, , 

DTFXFXUR 

0134 


DTFXNW 

01 ID 


DTFXSPR1 

0114 


DTFXDUMY 

004C 

, , 

DTFXFXUU 

0130 


DTFXNWCC 

010D 


DTFXSPR2 

0115 


DTFXDWCI 

0116 

04 

DTFXHRBA 

0139 


DTFXNWH 

010F 


DTFXSSFT 

0049 

20 

DTFXD1LF 

0038 


DTFXIDEN 

0000 


DTFXOCCW 

0064 


DTFXSSFN 

0049 

10 

DTFXD1LP 

0039 

, , 

DTFXI0AD 

0104 


DTFXOCHP 

0065 


DTFXSSHD 

0049 

80 

DTFXD1UF 

003C 

, . 

DTFXIOA1 

00D0 


DTFXODVT 

00B4 


DTFXSSIC 

0116 


DTFXD1UP 

003D 

, . 

DTFXIOEH 

00F2 

40 

DTFXORSP 

0050 


DTFXSSIG 

004B 

40 

DTFXECBI 

000E 

08 

DTFXIOFL 

0018 


DTFXPBNR 

00 EC 


DTFXSSLB 

0110 


DTFXEOFH 

00F2 

02 

DTFXIOPT 

0064 

80 

DTFXPONV 

00F2 

04 

DTFXSSLC 

0049 

40 

DTFXEOX 

0112 

80 

DTFXIORB 

000E 

04 

DTFXPRPT 

013F 


DTFXSSL1 

0110 


DTFXEOXH 

00F2 

80 

DTFXIORP 

00F2 

10 

DTFXRBFL 

0018 


DTFXSSL2 

0111 


DTFXERIP 

0116 

40 

DTFXIOWP 

00F2 

20 

DTFXRBPT 

0019 


DTFXSSOP 

0125 


DTFXERNM 

004B 

20 

DTFXLBLN 

0102 


DTFXRCIC 

011E 


DTFXSSPR 

0108 


DTFXERXT 

00C4 


DTFXLBRD 

one 


DTFXRCIN 

010D 


DTFXSSRW 

0149 


DTFXEXF 

0120 


DTFXLBTL 

0112 

08 

DTFXRCIR 

010C 


DTFXSSR1 

0117 

, . 

DTFXEXFR 

0120 


DTFXLCBC 

OOFA 


DTFXRELL 

0135 


DTFXSSSK 

004B 

80 

DTFXEXR 

0124 


DTFXLCDD 

OOFC 


DTFXREOC 

0112 

20 

DTFXTPC 

0141 


DTFXE1LF 

0040 


DTFXLCOB 

00F8 


DTFXRETR 

00F3 

10 

DTFXTPC1 

0143 


DTFXE1LP 

0041 


DTFXLCRC 

00F9 


DTFXRIOE 

0116 

08 

DTFXTRAF 

000A 

80 

DTFXE1UF 

0044 


DTFXLHH 

014D 


DTFXRLCI 

010C 


DTFXTRHD 

00F9 

20 

DTFXE1UP 

0045 


DTFXLMEP 

0116 

02 

DTFXRLC1 

010C 


DTFXTRNC 

004B 

08 

DTFXFBAB 

00B0 


DTFXLMPT 

006D 


DTFXRLEN 

0100 


DTFXUHH 

014F 


DTFXFBAO 

0050 


DTFXLMSA 

0070 


DTFXRPIP 

0116 

80 

DTFXULLX 

00C8 

. . 

DTFXFBLF 

0028 


DTFXLMSP 

006C 


DTFXRPS 

0049 

08 

DTFXULUX 

OOCO 


DTFXFBLP 

0029 


DTFXLMSW 

006C 


DTFXRQCP 

0112 

02 

DTFXUPDT 

004B 

04 

DTFXFBUF 

002C 


DTFXL0BC 

00C6 


DTFXRSVD 

006C 

01 

DTFXUWRQ 

00F3 

20 

DTFXFBUP 

002D 


DTFXLOCD 

00F8 


DTFXRSV1 

0024 


DTFXVALC 

00F3 

04 

DTFXFLB1 

0028 


DTFXLOCF 

00C4 


DTFXRSV4 

00D8 


DTFXVER3 

006C 

08 

DTFXFLC1 

0030 


DTFXLOC1 

OOCO 


DTFXRWCF 

OOCO 


DTFXVLBC 

00D6 


DTFXFLD1 

0038 


DTFXLOLP 

00C1 


DTFXRHCW 

00C8 


DTFXVLCF 

00D4 


DTFXFLE1 

0040 


DTFXLOOC 

OOCO 


DTFXRWDP 

00C9 


DTFXVLLP 

00D1 


DTFXFLF1 

0048 


DTFXLORS 

00C5 


DTFXRWLN 

OOCE 


DTFXVLOC 

00D0 


DTFXFLG1 

0048 


DTFXLSIO 

00F3 

02 

DTFXRWOC 

0008 


DTFXVLRS 

00D5 


DTFXFLS1 

0028 


DTFXMECP 

0064 

20 

DTFXRHRS 

GOOD 


DTFXVNOP 

OODQ 


DTFXFL10 

0049 


DTFXMSWA 

OOBC 

# # 

DTFXSARC 

00F9 

80 

DTFXVYES 

004B 

oi 

DTFXFL20 

004A 


DTFXMTRQ 

00F9 

40 

DTFXSCDF 

0116 

10 

DTFXNEOC 

0112 

10 

DTFXFL30 

004B 


DTFXNDTF 

0058 

• • 

DTFXSDSD 

0060 

40 

DTFXNORK 

004B 

10 

DTFXFORW 

00F3 

08 

DTFXNHRB 

0049 

04 

DTFXSDNF 

006C 

10 

DTFXXLEN 

0060 


DTFXFREE 

00F3 

80 

DTFXNIOA 

004B 

02 

DTFXSEOF 

0112 

04 

DTFXXRSV 

00E9 


DTFXFRVS 

0064 

40 

DTFXNLBF 

0112 

40 

DTFXSFSW 

0064 

. . 

DTFXXTFB 

00 EC 


DTFXFWRQ 

00F3 

40 

DTFXNLBO 

0118 

# 9 

DTFXSIOl 

00D4 


DTFXXTFD 

00F0 


DTFXFXLC 

012C 


DTFXNOMT 

0049 

01 

DTFXSI02 

00D8 

. . 

DTFXXTLD 

00F4 


DTFXFXLH 

012E 


DTFXNPCC 

010C 


DTFXSKEX 

0116 

20 

DTFXXTMB 

0 0E8 


DTFXFXLL 

012C 


DTFXNPCK 

010C 


PTFXSMWP 

OOCO 

. . 

DTFXXTNT 

00E8 


DTFXFXUC 

0130 


DTFXNPH 

010E 


DTFXSPB1 

0112 

• • 

DTFX1411 

0049 

02 

DTFXFXUH 

0132 


DTFXNPR 

0110 


DTFXSPB2 

0113 

# 

DTFX2BCI 

0141 


DTFXFXUL 

0130 


DTFXNRDF 

011A 


DTFXSPRO 

006C 

04 

DTFX2BM1 

0143 
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EPLIST 


EPLIST: EXTENDED PLIST DSECT 

EPLIST is used to map the extended plist. EPLIST is found in the EPLIST macro. 


EPLCMD 

EPLARGBG 

EPLARGND 

///////////////////// 

EPARGLST 

EPFUNRET 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 EPLCMD 4 

4 EPLARGBG 4 

8 EPLARGND 4 

Values Defined in 

B EPLCMDFL 
5 EPFUNSUB 
1 EPLFNCFL 

C 4 

10 EPARGLST 4 

14 EPFUNRET 4 


ADDRESS OF COMMAND TOKEN 
ADDRESS OF BEGINNING OF ARGUMENTS 
ADDRESS OF END OF ARGUMENTS 
EPLARGND 

EXTENDED PLIST AVAILABLE FLAG 
EXTERNAL FUNCTIOM PLIST AVAILABLE 
EXTENDED PLIST AVAILABLE FLAG 

RESERVED 

ADDRESS OF FUNCTION ARGUMENT LIST 
ADDRESS FOR RETURN OF FUNCTION DATA 


Note: The extended PLIST FLAGS indicate the presence of an extended PLIST 
in REGISTER 0. The high order byte of REGISTER 1 will contain either 
EPLCMDFL or EPLFNCFL to indicate that the extended PLIST is available. 

Only the first 4 words of the extended PLIST are available with these 
codes. 

If the high order byte of REGISTER 1 contains EPFUNSUB, then the invocation 
is an external function/subroutine called from REXX. With this PLIST, 
all 6 words of the PLIST are available* Word 5 points to a list of 
doublewords ADLENS (ADDRESS-LENGTH PAIRS) that describes the arguments 
to the routine (EPARGLST). Word 6 (EPFUNRET) is the location for the 
called routine to store the address of an EVALBLOK to return data to the 
calling program. 


CROSS REFERENCE (Name Pi sp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

EPLARGBG 0004 .. EPFUNRET 0014 .. EPLARGND 0008 .. EPLCMD 0000 .. 
EPARGLST 0010 .. EPLCMDFL 0008 0B 

EPLFNCFL 0008 01 
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ERDSECT: ERROR HANDLING ROUTINE DSECT 

ERDSECT describes the fields in a work area used for giving responses and errors via 
the DMSERR or LINKEDIT macros. The field NUCERT in NUCON points to the DMSERT CSECT 
in DMSNUC. ERDSECT is invoked by the DMSERT macro. 



ERSAVE 


58 

AO 

A8 

BO 

B8 

CO 

C8 

DO 

D8 

EO 


160 

168 


ERPAS13 


AX1 


i 


A*2 

ERPNUM 

ERPBFA 

ERSBD 

ERSSZ 


///////// 
A*3 


i 


i 


ERPTXA 


ERPCS 


i 


///////// 


ERPSBA 

"1 

A*4 

///////////////////// 


Ii*?I 


(Doubleword preceding text) 


i 


ERMESS 


cont 


‘I A * 6 I 


A*7 


ERSECT 


ERNUM 


ERTEXT 


i 


///////// 


ERTPL 


i 


ERTPLA 


ERTPLL 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 ERT1 8 

8 ERT2 16 

SAVE AREA 
18 ERSAVE 64 


DOUBLEWORD WORKSPACE 
TWO DOUBLEWORDS WORKSPACE 
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ERDSECT 


DISP NAME LEN KEY DESCRIPTION 


58 ERPAS13 72 PASS THIS SAVE AREA IN REG 13 TO BALR 1 ED-TO ROUTINES 

RECONSRUCTED PLIST AREA 
AO ERPF1 1 AX1 FIRST FLAG BYTE 


Values Defined in ERPF1 


80 ERF1TX 
40 ERF1HD 
20 ERF1BF 
10 ERF1SB1 
08 ERF1SBN 


TEXT ADDRESS IN PLIST 

HEADER IN PLIST 

BUFFER ADDRESS IN PLIST 

ONE SUBSTITUTION 

MULTIPLE SUBSTITUTIONS (> 1) 


A1 ERPF2 1 AX2 SECOND FLAG BYTE 


Values Defined in ERPF2 


(First three bits indicate 'DISP 1 field) 


80 

ERF2CM 



BLANK COMPRESSION WANTED 


40 

ERF2DT 



DOT AT END OF LINE WANTED 


20 

ERF2DI 



•DIE = YES* WANTED 


(Previous 

three 

bits 

indicate f DISP' field) 


05 

ERF2CP 



CPCOMM 


04 

ERF2PR 



PRINT 


03 

ERF2N0 



NONE 


02 

ERF2SI 



SIO 


01 

ERF2TY 



TYPE 


00 

ERF2ER 



ERRMSG 


A2 


2 


RESERVED 


A4 

ERPTXA 

4 


TEXT ADDRESS 


A8 

ERPHDR 

6 


ERROR MESSAGE HEADER 


A8 

ERPNUM 

2 


MESSAGE NUMBER 


AA 

ERPLET 

1 

A*3 

MESSAGE LETTER 


AB 

ERPCS 

3 


CSECT NAME 


AE 


2 


RESERVED 


B0 

ERPBFA 

4 


BUFFER ADDRESS (FOR •BUFFA 1 ) 


FIELDS 

; FOR SUBSTITUTIONS 


B4 

ERPSBA 

4 


POINTER TO FIRST (NEXT) GROUP 

OF SUB PARAMS IN ORIGINAL 

B8 

ERSBD 

4 


DATA ADDRESS/VALUE OR CURRENT 

SUB 

BC 

ERSBF 

1 

AX4 

SUB FLAG BYTE FOR CURRENT SUB 



Values Defined in ERSBF 

80 ERSFLST THE LAST SUBSTITUTION PARAM 

40 ERSFA 1 A*-TYPE OPTION 

20 ERSFL LENGTH SPECIFIED 

(Previous three bits give option type) 

04 ERSFC8 CHAR8A 

03 ERSFH4 HEX4A 

02 ERSFC CHARA 

01 ERSFD DEC OR DECA 

00 ERSFH HEX OR HEXA 

BD ERSBL 1 A*5 SUB LENGTH BYTE FOR CURRENT SUB 


LY24-5221 (c) Copyright IBM Corp. 1986 

CMS Data Areas and Control Block Logic 101 







ERDSECT 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

BE 


2 

RESERVED 


CO 

ERSSZ 

4 

SIZE OF SUB FIELD (# DOTS - 

C4 


4 

RESERVED 

MESSAGE CONSRUCTION AREA 

C8 


8 

NEED DOUBLEWORD BEFORE TEXT 

DO 

ERMESS 

3 

FIRST LETTERS OF HEADER 

D3 

ERSECT 

3 

DSECT NAME 

D6 

ERNUM 

3 

MESSAGE NUMBER 

D9 

ERLE 

1 A*6 

MESSAGE LEVEL LETTER 

DA 

ERBL 

1 A*7 

BLANK 

Values Defined in ERBL 

82 

ERTSIZE 


MAX TEXT SIZE 

DB 

ERTEXT 131 

MESSAGE TEXT AREA 

f TYPLIN f / f PRINTR 

1 PLIST 

CONSTRUCTION AREA 

160 

ERTPL 

8 


168 

ERTPLA 

4 

MESSAGE TEXT ADDRESS 

16C 

ERTPLL 

4 

MESSAGE LENGTH 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ERBL 

00DA 

t # 

ERF2SI 

00A1 

02 

ERPNUM 

00A8 


ERSFH 

OOBC 

00 

ERF1BF 

00A0 

20 

ERF2TY 

00A1 

01 

ERPSBA 

00B4 


ERSFH4 

OOBC 

03 

ERF1HD 

00A0 

40 

ERLET 

00D9 


ERPTXA 

00A4 


ERSFL 

OOBC 

20 

ERF1SBN 

00A0 

08 

ERMESS 

00D0 


ERSAVE 

0018 


ERSFLST 

OOBC 

80 

ERF1SB1 

00A0 

10 

ERNUM 

00D6 


ERSBD 

00B8 


ERSSZ 

OOCO 

• • 

ERF1TX 

00A0 

80 

ERPAS13 

0058 


ERSBF 

OOBC 


ERTEXT 

OODB 

# # 

ERF2CM 

00A1 

80 

ERPBFA 

00B0 


ERSBL 

OOBD 


ERTPL 

0160 

m m 

ERF2CP 

00A1 

05 

ERPCS 

OOAB 


ERSECT 

00D3 


ERTPLA 

0168 

9 # 

ERF2DI 

00A1 

20 

ERPF1 

00A0 


ERSFA 

OOBC 

40 

ERTPLL 

016C 

# 9 

ERF2DT 

00A1 

40 

ERPF2 

00A1 


ERSFC 

OOBC 

02 

ERTSIZE 

OODA 

CM 

eo 

ERF2ER 

00A1 

00 

ERPHDR 

00A8 


ERSFC8 

OOBC 

04 

ERT1 

0000 


ERF2N0 

00A1 

03 

ERPLET 

OOAA 


ERSFD 

OOBC 

01 

ERT2 

0008 


ERF2PR 

00A1 

04 
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EXISBLK 


EXISBLK: EXECS IN STORAGE CONTROL BLOCK 

| Each storage resident EXEC is represented by an EXISBLK on the EXIS chain. The EXIS 
chain is pointed to by the NUCEXIS field in NUCON. EXISBLK is found in EXISBLK 
macro. 


0 

8 

10 

18 


EXISFWP J EXISDWDS 

EXISFN 
EXISFT 

EXISXCNT | EX1 j~E*2 J _ EXISFBLK 


SIZE 

LENGTH IN BYTES (EXISBLKB) 20 
LENGTH IN DOUBLEWORDS CEXISBLKD) 04 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

EXISFWP 

4 

CHAIN POINTER TO NEXT EXISBLK 

4 

EXISDWDS 

4 

DOUBLEWORDS OF STORAGE ALLOCATED 

8 

EXISFN 

8 

EXEC FILENAME 

10 

EXISFT 

8 

EXEC FILETYPE 

18 

EXISXCNT 

2 

EXEC EXECUTION COUNT 

1A 

EXISFLG 

1 E*1 

FLAG BYTE 

Values Defined in EXISFLG 

80 

40 

20 

10 

EXISSYS 

EXISDPDG 

EXISREXX 

EXISSHRD 


DENOTES "SYSTEM" EXEC — 

DENOTES DROP PENDING -- 
0 - EXEC2 1 - REXX 

EXEC RESIDES IN A DCSS 

IB 

EXISRLVL 

1 EX2 

EXEC RECURSION LEVEL 

1C 

EXISFBLK 

4 

EXEC FILEBLOCK POINTER 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


EXISBLKB .... 

20 

EXISDWDS 

0004 .. 

EXISFN 

0008 .. 

EXISREXX 

001A 

20 

EXISBLKD .... 

04 

EXISFBLK 

001C .. 

EXISFT 

0010 .. 

EXISRLVL 

001B 

, . 

EXISDPDG 001A 

40 

EXISFLG 

001A .. 

EXISFWP 

0000 .. 

| EXISSHRD 

001A 

10 


LY24-5221 (c) Copyright IBM Corp. 1986 

CMS Data Areas and Control Block Logic 103 








EXISBLK 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


CROSS REFERENCE tName Diso Value) 

EXISSYS 001A 80 
EXISXCNT 0018 . . 
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EXTSECT 


EXTSECT: EXTERNAL INTERRUPT WORK AREA 

EXTSECT describes the fields in the external interrupt work area referenced by 
DMSITE. EXTSECT is pointed to by the AEXTSECT field in NUCON. EXTSECT is invoked 
via the EXTSECT macro. 



o 1 

L__ 

EXSAVE 

i 

_i 


40 

TYPLIST 


48 

TIMCCW 


50 

TIMCHAR 


58 


SCAW 

1 


60 



TIMINIT | 


68 

L____ 

EXSAVE1 

i 

_I 


A8 

EXTPSW | 


B0 

| SAVEXT 

_ 


B8 

1 EXTRET ] 


CO 

JR0 

1 _ JR1 _ I 


C8 

STIMEXIT 

A*1 

/////////////// 

HEX 

DISP 

NAME 

LEN 

KEY DESCRIPTION 



0 

EXSAVE 

64 

SAVED REGISTERS 


40 

TYPLIST 

8 

P-LIST TO TYPE 

BLIP-CHAR'S 

48 

TIMCCW 

8 




50 

TIMCHAR 

8 

BLIP-CHARACTERCS) 


58 

SCAW 

12 

SAVED CSW-CAW 



64 

TIMINIT 

4 

VALUE TO SET TIMER = 

2 SECONDS 

STORAGE FOR EXTERNAL 

(OTHER THAN TIMER) INTERRUPT 

68 

EXSAVE1 

64 

SAVED REGISTERS 


A8 

EXTPSW 

8 

FILLED-IN PSW. 

• • 


BO 

SAVEXT 

4 

TRANSFER-ADDRESS FOR 

EXTERNAL INTERRUPT 
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DISP NAME LEN KEY DESCRIPTION 

B4 4 ADDRESS IN DEBUG FOR EXT. INT. 

STORAGE FOR EXTERNAL INTERRUPT SET UP BY "TRAP 1 


B8 

EXTRET 

8 

SAVED EXT-OLD-PSW 

CO 

JR0 

4 

22 DOUBLEWORDS FOR FPRS & USER-SAVEAREA 

C4 

JR1 

4 

ADDRESS OF FREE STORAGE 

C8 

STIMEXIT 

4 

ADDRESS OF STIMER EXIT ROUTINE 

CC 

EXTFLAG 

1 A*1 



Values Defined in EXTFLAG 
80 REALTIMR REAL TIMER INDICATOR 

CD 3 RESERVED 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

EXSAVE 0000 .. EXTRET 00B8 .. SAVEXT 00B0 .. TIMCHAR 0050 .. 

EXSAVE1 0068 .. JR0 00C0 .. SCAW 0058 .. TIMINIT 0064 .. 

EXTFLAG 00CC .. JR1 00C4 .. STIMEXIT 00C8 .. TYPLIST 0040 .. 

EXTPSW 00A8 .. REALTIMR 00CC 80 TIMCCW 0048 .. 


/f- 

[ 

\ 
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EXTUAREA 


EXTUAREA: EXTERNAL USER AREA 

EXTUAREA is a 96-byte user area generated by the CMSAVE macro. The pointer to the 
user area is passed to the user via register 13. The USAVEPTR field in CMSAVE also 
points to the user area. 



HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

GRS 

64 

REGS AT TIME OF INTERRUPT P3048 

40 

FRS 

32 

FLOAT REGS AT INTERRUPT P3048 

60 

UEXTPSHO 

8 

EXTERNAL OLD PSW AT INTERRUPT P3048 

68 

USERAREA 

72 

USER SAVE AREA P3048 

B0 

PREVUSER 

4 

POINTER TO PREVIOUS USER AREA 

B4 


4 

RESERVED 

B8 

USAREAND 

8 

END USER AREA 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

FRS 0040 .. PREVUSER 00B0 .. UEXTPSWO 0060 .. USAREAND 00B8 .. 

GRS 0000 .. USERAREA 0068 .. 
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V 

FBLOCK: EXEC FILE EXECUTION CONTROL BLOCK 

| FBLOCK contains information used by EXEC2 or the System Product Interpreter (REXX) 
to execute an EXEC. A pointer to the FBLOCK is provided in the PLIST when the 
appropriate interpreter is called to execute the EXEC. FBLOCK is found in FBLOCK 
macro. 


0 

FBLNAME 

8 

FBLTYPE 

10 

FBLMODE | FBLEXTL 

FBLDLS 

18 

FBLDLE 

FBLPREF 

20 

FBLPREF (cont.) 



SIZE 

Length of FBLOCK in bytes (FBLLENL ) 24 

Length of fileid (FBLLFI ) 12 

Length of FBLOCK in doublewords (FBLLEND) 05 


HEX 

DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

FBLNAME 

8 

Filename 

8 

FBLTYPE 

8 

Filetype 

10 

FBLMODE 

2 

Filemode 


12 

FBLEXTL 

2 

Extension block 

length (words) 

14 

FBLDLS 

4 

Descriptor list 

start 

18 

FBLDLE 

4 

Descriptor list 

end 

1C 

FBLPREF 

8 

Explicit initial 

prefix 

ROSS 

REFERENCE 

(Name 

Disp Value) 



f 

\ 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


FBLDLE 

0018 .. 

FBLLEND 

.... 05 

FBLMODE 

0010 .. 

FBLPREF 

001C .. 

FBLDLS 

0014 .. 

FBLLENL 

.... 24 

FBLNAME 

0000 .. 

FBLTYPE 

0008 .. 

FBLEXTL 

0012 .. 

FBLLFI 

.... 12 






f 

V 
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FCBSECT 


( 

FCBSECT: SIMULATED OS CONTROL BLOCKS 

FCBSECT consists of the CMS file control block (FCB) used for file management under 
CMS, the simulated OS job file control block (JFCB), input/output block (IOB), and 
data extent block (DEB). FCBSECT is invoked via the CMSCB macro. FCBSECT is 
dynamically allocated from CMS free storage each time the FILEDEF command is issued. 

0 
8 

10 


28 

30 

38 

40 

48 

| 50 

58 

60 

68 

70 

78 

(; as 

90 

98 

A0 

A8 

B0 

B8 

CO 


t 
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C8 

FCBXTENT 

FCBTEOV 

DO 

FCBTSAVE 

A*18| A#19| FCBVSEQ 

D8 

FCBTVIPL 

FCBSYSPA 

E0 

FCBSYSPL 



• Format of Location X’24' for Console Device 



FCBIOOUT 

FCBIOOUT Ccont.) 

FCBIOBUF 

A*16 AX17 

FCBIOCNT 



SI Z E 

SIZE OF FOB ENTRY IN DOUBLEWORDS CFCBENSIZ) IB 
HEX 


MSP 

NAME 

LEN KEY 

DESCRIPTION 

0 

FCBINIT 

1 

INTERESTING TIDBITS 

Values Defined in FCBINIT 

80 

FCBDID 


ASSOCIATE DDNAME WITH ENTIRE DISK FOR DISKID USAGE 

40 

FCBCATLD 


CONCATENATED OS LOADLIB 

20 

FCBDOSL 


CONCATENATED DOSLIB DATA SET 

10 

FCBOS 


FCB FOR OS FORMATTED DISK 

08 

FCBOPCB 


OPEN ACQUIRED THIS CMS BLOCK 

04 

FCBPERM 


PERMANENT CONTROL BLOCK 

02 

FCBBATCH 


SPECIAL BATCH DATA SET 

01 

FCBCATML 


CONCATENATED MACLIB DATA SET 

0 

FCBNEXT 

4 

AL3CNEXT CMSCB) 

4 

FCBPROC 

4 

ACSPECIAL PROCESSING ROUTINE) 

8 

FCBDD 

8 

DATA DEFINITION NAME 

10 

FCBOP 

8 

CMS OPERATION 

18 

IHAJFCB 

0 

XX# JOB FILE CONTROL BLOCK x## 

18 

JFCBDSNM 

0 

44 BYTES, DATA SET NAME 

18 

FCBDSNAM 

8 

DATA SET NAME 

20 

FCBDSTYP 

8 

DATA SET TYPE 

24 

FCBPRPU 


PRINTER/PUNCH COMMAND LIST 

28 

FCBTBSP 

0 

2 BYTES, TAPE BACKSPACE COUNT 

28 

FCBDSMD 

2 

DATA SET MODE 

2A 


2 

RESERVED 

2C 

FCBBUFF 

4 

A(INPUT-OUTPUT BUFFER) 

30 

FCBBYTE 

4 

DATA COUNT 
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FCBSECT 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

34 

FCBFORM 

1 

AX1 

FILE FORMAT: FIXED/VARIABLE RECORDS 

35 

FCBEPL 

1 

A*2 

EXTENDED PLIST FLAG 

36 


2 


RESERVED 

38 

FCBREAD 

4 


N 1 BYTES ACTUALLY READ 

3C 

FCBITEM 

4 


EXTENDED PLIST ITEM COUNT 

40 

FCBCOUT 

4 


EXTENDED PLIST RECORDS / PHYSICAL BLOCK 

44 

FCBWPTR 

4 


EXTENDED PLIST WRITE POINTER 

48 

FCBRPTR 

4 


EXTENDED PLIST READ POINTER 

4C 

FCBDEV 

1 

A*3 

DEVICE TYPE CODE 

Values Defined in FCBDEV 

1C 

FCBCRT 



CRT 

18 

FCBPCH 



PUNCH 

14 

FCBDSK 



DISK 

10 

FCBTAP 



TAPE 

0C 

FCBCON 



CONSOLE TERMINAL 

08 

FCBRDR 



READER 

04 

FCBPTR 



PRINTER 

00 

FCBDUM 



DUMMY DEVICE 

4D 

FCBMODE 

1 

A*4 

MODE: 1,2,3,4,5 

4E 


2 


RESERVED 

50 

FCBRECL 

2 


DCB LRECL AT OPEN TIME 

52 

I0BI0FLG 

1 

A*5 

I/O FLAGS 

53 

FCBDCBCT 

1 

A*6 

NUMBER OF DCB 1 S USING THIS FCB 

54 

FCBR13 

4 


SAVEAREA VECTOR R13 

58 

FCBKEYS 

4 


ACDDS IN 1 CORE KEY TABLE) 

5C 

FCBPDS 

4 


ACPDS IN-CORE DIRECTORY) 

60 

JFCBMASK 

8 


VARIOUS MASK BITS 

68 

JFCBCRDT 

3 


DATA SET CREATION DATE (YDD) 

6B 

JFCBXPDT 

3 


DATA SET EXPIRATION DATE (YDD) 

6E 

JFCBIND1 

1 

AX7 

INDICATOR ONE 

6F 

JFCBIND2 

1 

A*8 

INDICATOR TWO 

70 

JFCBUFNO 

1 

A*9 

NUMBER OF BUFFERS 

71 

JFCBFTEK 

0 


BUFFERING TECHNIQUE 

71 

JFCBFALN 

1 

AX10 

BUFFER ALIGNMENT 

72 

JFCBUFL 

2 


BUFFER LENGTH 

74 

JFCEROPT 

1 

Axil 

ERROR OPTION 

75 

JFCKEYLE 

1 

AX12 

KEYLENGTH 

76 


1 


—NOT USED— 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

77 

JFCLIMCT 

3 AXIS 

BDAM SEARCH LIMIT 

7A 

FCBDSORG 

0 

DATA SET ORGANIZATION 

7A 

JFCDSORG 

2 


7C 

FCBRECFM 

0 

RECORD FORMAT 

7C 

JFCRECFM 

1 A*14 


7D 

JFCOPTCD 

1 A*15 

OPTION CODES 

7E 

FCBBLKSZ 

0 

BLOCK SIZE 

7E 

JFCBLKSI 

2 


80 

FCBLRECL 

0 

LOGICAL RECORD LENGTH 

80 

JFCLRECL 

2 


82 

FCBIOSW 

1 A*16 

I/O OPERATION INDICATOR 

Values Defined in FCBIOSW 

80 

FCBCLOSE 


DURING "CLOSE" 

40 

FCBCLEAV 


DISP = LEAVE DURING CLOSE 

20 

FCBPROCC 


GOTO FCBPROC DURING CLOSE 

10 

FCBPROCO 


GOTO FCBPROC DURING OPEN 

08 

FCBCASE 


ON=LOWER CASE CONSOLE I/O 

04 

FCBPVMB 


PUT-MOVE-VAR-BLK 

02 

FCBI0WR 


WRITE/PUT 

01 

FCBIORD 


READ/GET 

83 

FCBI0SW2 

1 A*17 

I/O OPERATION INDICATORS 

Values Defined in FCBI0SW2 

80 

FCBWRTSW 


INDICATE DCB OPEN FOR WRITE 

40 

FCBADTOS 


INDICATE OS FORMATTED DISK 

08 

FCBMVFIL 


MOVEFILE IS ACTIVE 

02 

FCBMMV 


MOVE PDS SWITCH FOR FIND 

01 

FCBMVPDS 


SW FOR MOVEFILE WITH PDS OPTION 

84 

DEBLNGTH 

0 

LENGTH OF DEB IN DOUBLEWORDS 

Values Defined in DEBLNGTH 

40 

FCBTCLOS 


A CLOSE TYPE T WAS DONE 

84 


4 

---NOT USED— 

88 

IHADEB 

0 

xxx DATA EXTENT BLOCK xxx 

88 

DEBTCBAD 

4 

ACMOVE-MODE USER BUFFER) 

8C 

SEBSAV 

4 

DYNAMIC SAVE FOR RETURN ADDRESS FOR SEB (OS 

90 

DEBOFLGS 

4 

DATA SET STATUS FLAGS 

94 

DEBOPATB 

4 

OPEN/CLOSE OPTION BYTE 

98 

IOBFLG 

0 

(START OF IOBPREFIX FOR NORMAL SCHEDULING) 


Values Defined in IOBFLG 


40 I0B0UT 
20 IOBIN 
10 IOBUPD 
00 IOBBFLG 


"WRITE,PUT" IN PROGRESS 
"READ,GET" IN PROGRESS 
"QSAM PUTX" IN PROCESS 
DISPLACEMENT OF IOB FLAG IN IOB 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

98 

IOBNXTAD 

4 


ACNEXT BUFFER TO BE USED) 

9C 

IOBECB 

4 


ECB FOR QSAM NORMAL SCHEDULING 

AO 

IHAIOB 

0 


xxx INPUT/OUTPUT BLOCK xxx 

AO 

DEBDEBID 

0 


DEB IDENTIFICATION 

AO 

DEBDCBAD 

4 


A(DATA CONTROL BLOCK) 

A4 

IOBECBCC 

0 


ECB COMPLETION CODE 

Values Defined in 

IOBECBCC 

OC 

IOBBECBC 



DISPLACEMENT OF ECB CODE IN IOB 

OC 

IOBBECBP 



DISPLACEMENT OF ECB POINTER IN IOB 

A4 

IOBECBPT 

4 


ACEVENT CONTROL BLOCK) 

A8 

I0BFLAG3 

0 


I/O ERROR FLAG 

Values Defined in 

I0BFLAG3 

10 

IOBBCSW 



DISPLACEMENT OF CSW IN IOB 

A8 

IOBCSH 

8 


LAST CCN STORED (I.E., RESIDUAL COUNT) 

BO 

IOBSTART 

4 


X f ID-NEXT BUFFER 1 ,AL3(INITIAL BUFFER) 

B4 

IOBDCBPT 

4 


A(DATA CONTROL BLOCK) 

B8 

IOBEND 

0 


END-OF-INPUT/OUTPUT BLOCK 

B8 

FCBMEMBR 

8 


OS PDS MEMBER NAME 

CO 

FCBOSFST 

4 


POINTER TO OS FST 

C4 

FCBOSDSN 

4 


POINTER TO OS DSNAME BLOCK 

C8 

FCBXTENT 

4 


NUMBER OF ITEMS IN EXTENT 

CC 

FCBTEOV 

4 


ADDRESS OF TEOVEXIT ROUTINE 

DO 

FCBTSAVE 

4 


ADDRESS OF SYSTEM REGISTER SAVE AREA FOR TEOVEXIT 

D4 

FCBFLAG1 

1 A*18 

MISCELLANEOUS FLAG BITS 

Values Defined in 

FCBFLAG1 

80 

FCBTEOVS 



TAPE-END-OF-VOLUME EXIT AVAILABLE 

40 

FCBTEOVA 



TEOV EXIT IS ACTIVE 

20 

FCBMVOL 



PROCESSING MULTIVOLUME FILE 

10 

FCBVSECT 



PROCESSING VOL IDS FROM A VOLSECT 

08 

FCBMTCAN 



TAPE MOUNT CANCELED FROM DMSTVS 

04 

FCBAMODE 



FCBMODE SET FOR ALTERNATE DRIVE 

D5 

FCBVCTR 

1 A*19 

VOLID COUNTER 

D6 

FCBVSEQ 

2 


TAPE VOLUME SEQUENCE NUMBER 

D8 

FCBEND 

0 


END-OF FCB, JFCB, DEB, IOB BLOCKS 

D8 

FCBTVIPL 

4 


DMSTVI PLIST ADDRESS 

DC 

FCBSYSPA 

4 


SYSPARM STRING ADDRESS 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

EO 

FCBSYSPL 

2 

SYSPARM STRING LENGTH(DWORDS) 

SPECIAL FIELDS 

FOR TAPE 

FILES ONLY 

18 

FCBTAPID 

4 

TAPE IDENTIFICATION 

1C 

FCBLABT 

1 

TAPE LABEL TYPE 

Values Defined in FCBLABT 

20 

10 

08 

06 

04 

02 

01 

00 

FCBNL 

FCBNSLMD 

FCBNSL 

FCBSUL 

FCBUSER 

FCBSL 

FCBBLP 

FCBOFF 


NO LABELS 

NSL ROUTINE IS A MODULE 

NONSTANDARD USER LABELS 

IBM AND USER STANDARD LABELS 

USER STANDARD LABELS 

IBM STANDARD LABELS 

BYPASS LABELS - JUST POSITION TAPE 
NO LABEL PROCESSING AT ALL 

ID 

FCBTPSW 

1 

TAPE SWITCH 

Values Defined in FCBTPSW 

80 

40 

FCBLEAVE 

FCBNOEOV 


DO NOT REPOSITION TAPE FOR OPEN 

DO NOT DO ANY EOV PROCESSING AT ALL 

IE 

FCBPOS 

2 

POSITION PARAMETER 

20 

FCBNSLNM 

8 

NSL ROUTINE NAME 

24 

FCBIOOUT 

8 

SPECIAL I/O COMMAND LIST 

2C 

FCBIOBUF 

4 

ACDATA BUFFER) 

30 

FCBCONCR 

1 A*18 

CONSOLE COLOR CODE 

31 

FCBCONMS 

1 A*19 

CONSOLE MISCELLANEOUS INFORMATION 

32 

FCBIOCNT 

2 

L 1 DATA BUFFER 

B8 

FCBLABPT 

4 

POINTER TO LABSECT 

BC 

FCBBLKCT 

4 

BLOCK COUNT FOR TAPE FILE 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DEBDCBAD 

00A0 


FCBCASE 

0082 

08 

FCBDOSL 

0000 

20 

FCBIOCNT 

0032 


DEBDEBID 

00A0 


FCBCATLD 

0000 

40 

FCBDSK 

004C 

14 

FCBIOOUT 

0024 


DEBLNGTH 

0084 


FCBCATML 

0000 

01 

FCBDSMD 

0028 


FCBIORD 

0082 

oi 

DEBOFLGS 

0090 


FCBCLEAV 

0082 

40 

FCBDSNAM 

0018 

# # 

FCBIOSW 

0082 


DEBOPATB 

0094 


FCBCLOSE 

0082 

80 

FCBDSORG 

007A 

9 9 

FCBI0SW2 

0083 


DEBTCBAD 

0088 


FCBCON 

004C 

OC 

FCBDSTYP 

0020 

• • 

FCBIOWR 

0082 

02 

FCBADTOS 

0083 

40 

FCBCONCR 

0030 

# t 

FCBDUM 

004C 

00 

FCBITEM 

003C 


FCBAMODE 

00D4 

04 

FCBCONMS 

0031 

# 9 

FCBEND 

00D8 


FCBKEYS 

0058 


FCBBATCH 

0000 

02 

FCBCOUT 

0040 

• • 

FCBENSIZ 

0000 

1A 

FCBLABPT 

00B8 


FCBBLKCT 

OOBC 

• • 

FCBCRT 

004C 

1C 

FCBEPL 

0035 

# # 

FCBLABT 

001C 


FCBBLKSZ 

007E 

m # 

FCBDCBCT 

0053 

# # 

FCBFLAG1 

00D4 

# # 

FCBLEAVE 

001D 

80 

FCBBLP 

001C 

01 

FCBDD 

0008 

# # 

FCBFORM 

0034 

t # 

FCBLRECL 

0080 


FCBBUFF 

002C 

# 9 

FCBDEV 

004C 

# # 

FCBINIT 

0000 

9 9 

I FCBLSTAR 

0085 


FCBBYTE 

0030 


FCBDID 

0080 

ft ft 

FCBIOBUF 

002C 

, # 

FCBMEMBR 

00B8 
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CROSS REFERENCE (Name Diso Value) 


FCBMMV 

0083 

02 

FCBPROCO 

0082 

10 

FCBVCTR 

00D5 


IOBNXTAD 

0098 


FCBMODE 

004D 

# * 

FCBPRPU 

0020 

24 

I FCBVSECT 

00D4 

10 

IOBOUT 

0098 

40 

FCBMTCAN 

00D4 

04 

FCBPTR 

004C 

04 

FCBVSEQ 

006D 

# # 

IOBSTART 

00B0 


FCBMVFIL 

0083 

08 

FCBPVMB 

0082 

04 

FCBWPTR 

0044 

# # 

IOBUPD 

0098 

io 

FCBMVOL 

00D4 

20 

FCBRDR 

004C 

08 

FCBWRTSH 

0083 

80 

JFCBCRDT 

0068 


FCBMVPDS 

0083 

01 

FCBREAD 

0038 


FCBXTENT 

00C8 


JFCBDSNM 

0018 


FCBNEXT 

0000 

# # 

FCBRECFM 

007C 


IHADEB 

0088 

m # 

JFCBFALN 

0071 


FCBNL 

001C 

20 

FCBRECL 

0050 


IHAIQB 

00A0 

# # 

JFCBFTEK 

0071 


FCBNOEOV 

001D 

40 

FCBRPTR 

0048 


IHAJFCB 

0018 


JFCBIND1 

006E 


FCBNSL 

001C 

08 

FCBR13 

0054 


IOBBCSN 

00A8 

10 

JFCBIND2 

006F 


FCBNSLMD 

001C 

10 

FCBSL 

001C 

02 

IOBBECBC 

00A4 

oc 

JFCBLKSI 

007E 


FCBNSLNM 

0020 

• • 

FCBSUL 

001C 

06 

IOBBECBP 

00A4 

oc 

JFCBMASK 

0060 


FCBOFF 

001C 

00 

| FCBSYSPA 

00 DC 

# # 

IOBBFLG 

0098 

00 

JFCBUFL 

0072 


FCBOP 

0010 


I FCBSYSPL 

00E0 

# # 

IOBCSW 

00A8 


JFCBUFNO 

0070 


FCBOPCB 

0000 

08 

FCBTAP 

004C 

10 

IOBDCBPT 

00B4 


JFCBXPDT 

006B 


FCBOS 

0000 

10 

FCBTAPID 

0018 

# m 

IOBECB 

009C 


JFCDSORG 

007A 


FCBOSDSN 

00C4 

# # 

FCBTBSP 

0028 

# # 

IOBECBCC 

00A4 


JFCEROPT 

0074 


FCBOSFST 

ooco 

# m 

FCBTCLOS 

0084 

40 

IOBECBPT 

00A4 


JFCKEYLE 

0075 


FCBPCH 

004C 

18 

FCBTEOVA 

00D4 

40 

IOBEND 

00B8 


JFCLIMCT 

0077 


FCBPDS 

005C 


DCBTEOVS 

00D4 

80 

I0BFLAG3 

00A8 


JFCLRECL 

0080 


FCBPERM 

0000 

04 

FCBTPSN 

001D 

, , 

IOBFLG 

0098 


JFCOPTCD 

007D 


FCBPOS 

001E 

• • 

I FCBTVIPL 

00D8 

, , 

IOBIN 

0098 

20 

JFCRECFM 

007C 


FCBPROC 

0004 

# # 

FCBUSER 

001C 

04 

IOBIOFLG 

0052 

. . 

SEBSAV 

008C 



FCBPROCC 0082 20 
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FCHSECT; FETCH WORK AREA 

FCHSECT contains a BLDL list, note list address, DCB, DECB, point field, FILEDEF 
PLIST, read buffer, and register save areas. The NUCAFCHS field in the NUCON 
control block points to the fetch work area. 


0 

8 

10 

18 

20 

28 


40 

48 

50 

58 


FCHBLDL 

FCHNAME 

(cont.) 

FCHTTR 

FX1 | 


F*2 

FCHTXT | | FCHNOTE j 

cont. 

F*3 

F*4 | F*5 

FCHLENG 

FX6 

F*6 

FHCEPA 

FX7 | FX8 j 

F*9 

| F*9(cont) 

FCHAMEM 






FCHNOTAD 

F*lo| F*ll| 

FCHSAV10 

FCHSAV14 

FCHPOINT 

FCHREGN 

fxi2| 

1 


CO 


FX13 


DO 


FDEF 

D8 

FDEF (cont.) 

FDEFDD 

E0 

FDEFDD (cont.) 

FDEFDEV 

E8 

FDEFDEV (cont.) 

FDEFNAME 

F0 

FDEFNAME (cont.) 

FDEFTYPE 

F8 

FDEFTYPE (cont) 

FDEFMODE 

100 

FDEFM0DE (cont) 



118 


140 


r~ 

FSTLIST 
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FCHSECT 


250 


- ! 

SBSREGS l 


298 


FCHREGS 

2E0 

FCHEND 



140 


F*151 

148 

FCHCCNT 

FCHRCNT 

FCHCCWA 

150 


F*16 


FCHCRELP 

158 

FX17 




SIZE 

LENGTH OF FILEDEF PLIST CFDEFLEN) 48 
LENGTH OF STATE PLIST CFSTTLEN) 28 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

FCHBLDL 

4 

BLDL LIST 

4 

FCHNAME 

8 

MODULE NAME 

C 

FCHTTR 

3 

MODULE TTR ADDRESS 

F 

FCHCONC 

1 FX1 

CONCATENATION NUMBER 


11 

FCHMISC 

1 

F*2 

ALIAS : 

INDICATOR AND MISC INFORMATION 

12 

FCHTXT 

3 


TTR OF 

FIRST TEXT RECORD 

16 

FCHNOTE 

3 


TTR OF 

NOTE OR SCATTER LIST 

19 

FCHNNOTE 

1 

F*3 

NUMBER 

OF NOTE LIST ENTRIES 

THE 

FOLLONING 

SETTINGS 

REPRESENT THE f 0N' CONDITION 

1A 

FCHATT1 

1 

F*4 

MODULE 

ATTRIBUTES 


Values Defined in FCHATT1 


80 

FCHRENT 

THE 

MODULE 

IS 

REENTERABLE 

40 

FCHREUS 

THE 

MODULE 

IS 

REUSEABLE 

20 

FCHOVLY 

THE 

MODULE 

IS 

OVERLAY MODULE 

10 

FCHTEST 

THE 

MODULE 

IS 

UNDER TEST 

08 

FCHLOAD 

THE 

MODULE 

IS 

ONLY LOADABLE 

04 

FCHSCAT 

THE 

MODULE 

HAS 

SCTR FORMAT 

02 

FCHEXEC 

THE 

MODULE 

IS 

EXECUTABLE 

01 

FCH1TXT 

THE 

MODULE 

HAS 

1 TXT, NO RLD 


LY24-5221 Cc) Copyright IBM Corp. 1986 

CMS Data Areas and Control Block Logic 117 















FCHSECT 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

IB 

FCHATT2 

1 

F*5 

MORE ATTRIBUTES 

Values Defined in FCHATT2 

80 

FCHLEDE 



THE MODULE NO RELINK BY f E f 

40 

FCHORIG 



THE ORIGIN OF 1ST TXT = 0 

20 

FCHENTP 



THE MODULE ENTRY POINT = 0 

10 

FCHNRLD 



THE MODULE HAS NO RLD RECS 

08 

FCHEDIT 



THE MODULE CAN’T BE RELINKED 

04 

FCHTRAN 



THE MODULE HAS TESTRAN RECS 

02 

FCHCOMP 



THE MODULE LINK-EDITED 

01 

FCHREFR 



THE MODULE IS REFRESHABLE 

1C 

FCHLENG 

3 


MODULE LENGTH 

IF 

FCHTXTL 

2 

F*6 

LENGTH OF 1ST TEXT RECORD 

21 

FCHEPA 

3 


ASSIGNED ENTRY POINT ADDRESS 

24 

FCHATT3 

1 

F*7 

ATTRIBUTE FIELD NUMBER 2 

Values Defined in FCHATT3 

80 

FCHLVS 



PROCESSED BY OS/VS L.E. 

40 

FCHRES1 



RESERVED UNUSED 

20 

FCHPAG 



PAGE ALIGNMENT REQ’D 

10 

FCHSSI 



SSI PRESENT 

25 

FCHRES2 

1 

F*8 

UNUSED ATTRIBUTE BYTES 

THE FOLLOWING FIELDS ONLY APPLY WHEN AN ALIAS IS USED 

27 

FCHAENT 

3 

FX9 

ENTRY POINT ADDRESS OF MEMBER 

2A 

FCHAMEM 

8 


MEMBER NAME 

44 

FCHN0TAD 

4 


ADDRESS OF NOTE LIST 

48 

FCHFLAG 

1 

F*10 

FETCH PROCESS FLAG 

49 

FCHOFLG 

1 

FX11 

2ND FETCH FLAG BYTE 

4C 

FCHSAV10 

4 


SAVE AREA FOR REG 10 

50 

FCHSAV14 

4 


SAVE AREA FOR REG 14 

54 

FCHP0INT 

4 


POINT BUFFER 

58 

FCHREGN 

4 


POINTER TO LAST REGN RELOCATED 

5C 

FCHDCB 

1 

FX12 

SSYSLIB DCB 

CO 

FCHDECB 

1 

F*13 

DECB WORK AREA 

D4 

FDEF 

8 


CMS COMMAND 

DC 

FDEFDD 

8 


DDNAME 

E4 

FDEFDEV 

8 


DEVICE 

EC 

FDEFNAME 

8 


DEFAULT FILENAME 

F4 

FDEFTYPE 

8 


FILE TYPE 

FC 

FDEFMODE 

8 


ANY MODE 

104 


8 


START OF OPTIONS 

10C 


8 


CONCATENATION 


LY24-5221 Cc) Copyright IBM Corp. 1986 

118 CMS Data Areas and Control Block Logic 



Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


FCHSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

114 


1 

STANDARD FENCE 

11C 

FSTLIST 

8 

CMS COMMAND 

124 


8 

DEFAULT LIBRARY NAME 

12C 


8 

LIBRARY TYPE 

134 


8 

LIBRARY MODE 

13C 


1 

FENCE 

144 

FCHRLDBF 

1 FX14 

BUFFER FOR MODULE INPUT 

Values Defined in FCHRLDBF 


BUFLEN 


270 EQUATE FOR BUFFER LENGTH 

254 

SBSREGS 

4 

REG SAVE AREA FOR READ 

29C 

FCHREGS 

4 

REGISTER SAVE AREA 

2E0 

FCHEND 

8 

END OF FETCH WORK AREA DSECT 

Values Defined in FCHEND 

78 

00 

FCHCLRLN 

FCHSCTLN 


FDEF-FCHDCB: LENGTH OF AREA TO CLEAR 
FCHEND-FCHSECT: LENGTH OF FETCH WORK AREA 

144 

FCHCID 

1 F*15 

IDENTIFICATION 

148 

FCHCCNT 

2 

BYTE COUNT OF CONTROL INFORMATION 

14A 

FCHRCNT 

2 

BYTE COUNT OF RLD INFORMATION 

14C 

FCHCCWA 

4 

ADDRESS PORTION OF CCW 

151 

FCHCCWL 

1 F*16 

LENGTH PORTION OF CCW 

154 

FCHCRELP 

4 

R AND P INFORMATION 

158 

FCHCFLAG 

1 F*17 

FLAG BYTE 


Values Defined in FCHCFLAG 


60 FLRELOC 
02 FLSUBTR 
01 FLNORP 


RECORD TO BE RELOCATED 
SUBTRACT OFFSETS 
NO R AND P FOLLOWING 


CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


BUFLEN 

0144 xx 

FCHCCWA 

014C 


FCHDCB 

005C 


FCHLEDE 

001B 

80 

FCHAENT 

0027 .. 

FCHCCWL 

0151 

• • 

FCHDECB 

ooco 

# # 

FCHLENG 

001C 

# # 

FCHAMEM 

002A .. 

FCHCFLAG 

0158 


FCHEDIT 

001B 

08 

FCHLOAD 

001A 

08 

FCHATT1 

001A .. 

FCHCID 

0144 


FCHEND 

02E0 

# # 

FCHLVS 

0024 

80 

FCHATT2 

001B .. 

FCHCLRLN 

02E0 

78 

FCHENTP 

001B 

20 

FCHMISC 

0011 

, . 

FCHATT3 

0024 .. 

FCHC0MP 

001B 

02 

FCHEPA 

0021 

# m 

FCHNAME 

0004 

, . 

FCHBLDL 

0000 .. 

FCHC0NC 

000F 

# m 

FCHEXEC 

001A 

02 

FCHNNOTE 

0019 

, . 

FCHCCNT 

0148 .. 

FCHCRELP 

0154 

# # 

FCHFLAG 

0048 

, . 

FCHNOTAD 

0044 

. • 
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CROSS REFERENCE CName Disc Value) 


FCHNOTE 

0016 

# , 

FCHRENT 

001A 

80 

FCHNRLD 

001B 

10 

FCHRES1 

0024 

40 

FCHOFLG 

0049 

* m 

FCHRES2 

0025 


FCHORIG 

001B 

40 

FCHREUS 

001A 

40 

FCHOVLY 

001A 

20 

FCHRLDBF 

0144 


FCHPAG 

0024 

20 

FCHSAV10 

004C 

# f 

FCHPOINT 

0054 

• » 

FCHSAV14 

0050 

# m 

FCHRCNT 

014A 

# # 

FCHSCAT 

001A 

04 

FCHREFR 

001B 

01 

FCHSCTLN 

02E0 

00 

FCHREGN 

0058 

# • 

FCHSECT 

0000 

# # 

FCHREGS 

029C 

# , 





FCHSSI 

0024 

10 

FDEFLEN 

• • • • 

48 

FCHTEST 

001A 

10 

FDEFMODE 

00FC 

f # 

FCHTRAN 

001B 

04 

FDEFNAME 

00 EC 

• • 

FCHTTR 

oooc 

# # 

FDEFTYPE 

00F4 

# # 

FCHTXT 

0012 

# # 

FLNORP 

0158 

01 

FCHTXTL 

001F 

* # 

FLRELOC 

0158 

60 

FCH1TXT 

001A 

01 

FLSUBTR 

0158 

02 

FDEF 

00D4 


FSTLIST 

one 


FDEFDD 

00DC 

# • 

FSTTLEN 

• • • • 

28 

FDEFDEV 

00E4 

• # 

SBSREGS 

0254 

. , 
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FCHTAB 


FCHTAB: FETCH TABLE 

FCHTAB contains a fetch/load parameter list that points to a 34-byte directory list. 
The fetch table is used when a VSE program issues a FETCH or LOAD request without 
the LIST= parameter. The IJBFTTAB field in the SYSCOM block in the DOSCON CSECT of 
NUCON points to the fetch table. FCHTAB is invoked via the FCHTAB macro. 


0 

FCHAPHNM 

A*1 

FCHALSNM 

8 

DIRNAME ] 

10 

DIRTTR 

| AX2 | DIRTT 

j DIRLL 

18 

A*3 | /// 


DIRPPP | 

DIREEE 

20 

DIRRR 

A*4 

| DIRAAA 

| /// | AX5 

28 

continued 



SIZE 

TOTAL LENGTH (42) IN BYTES (FCHLENG ) 2A 
TOTAL LENGTH IN DOUBLEWORDS (FCHLENDW) 06 

HEX 

DISP NAME LEN KEY DESCRIPTION 

8-BYTE PARAMETER LIST POINTING TO DIRECTORY LIST: 


0 

FCHAPHNM 

4 


ADDRESS OF PHASE NAME 

4 

FCHOPT 

1 

A*1 

OPTIONS 

5 

FCHALSNM 

3 


ADDRESS OF LISTNAME 

34- 

BYTE DIRECTORY 

LIST 


8 

DIRNAME 

8 


PHASE NAME 

10 

DIRTTR 

3 


PHASE TTR 

13 

DIRN 

1 

A*2 

NUMBER HALF WORDS IN DIRECTORY 

14 

DIRTT 

2 


NUMBER TEXT BLOCKS IN PHASE 

16 

DIRLL 

2 


LENGTH LAST TEXT BLOCK 

18 

DIRC 

1 

A*3 

FLAG BYTE 


Values Defined in DIRC 


80 

SELFREL 

PHASE 

SELF RELOCATABLE 

40 

RELPHSE 

PHASE 

TO BE RELOCATED 

20 

SVAELIG 

PHASE 

SVA ELIGIBLE 

10 

SVAPHSE 

PHASE 

IN SVA 

08 

PCLPHSE 

PHASE 

IN PRIV C.I.L. 

04 

PNOTFND 

PHASE 

NOT FOUND 

02 

DACTIVE 

PHASE 

DIRECTORY ACTIVE 

01 

N0TEXT 

TEXT = 

= NO SPECIFIED 


DIRT 1 

RESERVED 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

1A 

DIRPPP 

3 


PHASE LOAD POINT 

ID 

DIREEE 

3 


PHASE ENTRY POINT 

20 

DIRRR 

2 


NUMBER RLD ITEMS IN PHASE 

22 

DIRR 

1 

A*4 

NUMBER ADDITIONAL RLD BLOCKS 

23 

DIRAAA 

3 


PARTITION START ADDRESS 

26 


1 


UNUSED 

27 

DIRVEE 

3 

AX5 

PHASE ENTRY POINT IN SVA 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DACTIVE 

0018 

02 

DIRPPP 

001A .. 

FCHALSNM 

0005 

* m 

PCLPHSE 

0018 

08 

DIRAAA 

0023 


DIRR 

0022 .. 

FCHAPHNM 

0000 

# # 

PNOTFND 

0018 

04 

DIRC 

0018 


DIRRR 

0020 .. 

FCHLENDW 


06 

RELPHSE 

0018 

40 

DIREEE 

001D 


DIRT 

0019 .. 

FCHLENG 


2A 

SELFREL 

0018 

80 

DIRLL 

0016 


DIRTT 

0014 .. 

FCHOPT 

0004 

# # 

SVAELIG 

0018 

20 

DIRN 

0013 


DIRTTR 

0010 .. 

NOTEXT 

0018 

01 

SVAPHSE 

0018 

10 

DIRNAME 

0008 


DIRVEE 

0027 .. 








122 CMS Data Areas and Control Block Logic 


LY24-5221 (c) Copyright IBM Corp. 1986 







Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


FRDSECT 


FRDSECT: FREE CHAIN ELEMENT HEADER BLOCKS 

FRDSECT describes the fields used by DMSFRE to reference the four free chain element 
header blocks. FRDSECT is invoked by the macro DMSFRT. The DMSFRT DSECT is pointed 
to by a V-constant in DMSFREE, and also by the ADMSFRT field in NUCQN. 



SIZE OF AN FBD (FBDLEN) L 1 POINTER + L T SIZE + L 1 FBDFREE 
SIZE OF AN FBD IN DOUBLEWORDS (FBDLEND) (FBDLEN+7)/8 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

FREELN 

12 

LOWCORE NUCLEUS 

C 


4 


10 

FREELU 

12 

L0WC0RE USER CHAIN 

1C 


4 


20 

FREEHN 

12 

HIGHCORE NUCLEUS 

2C 


4 


30 

FREEHU 

12 

HIGHCORE USER CHAIN 


(c) Copyright IBM Corp. 1986 


LY24-5221 


CMS Data Areas and Control Block Logic 123 




















FRDSECT 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP NAME LEN KEY DESCRIPTION 


3C 4 V 

THE FOLLOWING SYMBOLIC EQUATES DESCRIBE THE FORMAT OF EACH OF THE FOUR FREE 
CHAIN ELEMENT HEADER BLOCKS. 


00 

POINTER 

4 

POINT TO FIRST FREE ELEMENT 

04 

NUM 


NUMBER OF ELEMENTS IN CHAIN 

08 

MAX 


MAXIMUM SIZE OF AN ELEMENT 

OC 

FLAGS 


FLAG BYTE 

0D 

SKEY 


STORAGE KEY FOR THIS CHAIN 

0E 

TCODE 


FREETAB TABLE CODE 

10 

BLOCKLEN 


SYMBOLIC LENGTH OF BLOCK 

DEFINITIONS FOR 

THE 'FLAGS' FLAG BYTE 

80 

FLCLN 


CLEAN-UP FLAG 

40 

FLCLB 


CLOBBERED CHAIN FLAG 

20 

FLHC 


HIGH-CORE FLAG 

10 

FLNU 


NUCLEUS FLAG 

08 

FLPA 


PAGE AVAILABLE ON CHAIN 

DEFINITIONS FOR 

•SKEY f 

STORAGE KEY VALUES 

F0 

NUCKEY 


NUCLEUS STORAGE KEY 

E0 

USERKEY 


USER STORAGE KEY 

DEFINITIONS FOR 

•TCODE 

• FREETAB TABLE CODE VALUES 

05 

SYSCODE 


SYSTEM PAGE 

05 

MAXC0DE 


MAXIMUM POSSIBLE CODE VALUE 

04 

USARCODE 


USER AREA PAGE 

03 

TRNCODE 


TRANSIENT AREA PAGE 

02 

NUCCODE 


NUCLEUS FREE STORAGE PAGE 

01 

USERCODE 


USER FREE STORAGE PAGE 

40 

AFREETAB 

4 

ADDRESS OF FREETAB TABLE 

44 

FREELOW1 

4 

ORIGINAL VALUE OF FREELOWE (SET BY INIT2) 

48 

ACALL 

4 

ADDRESS OF CALLER (FOR ERRORS) 

FLAG : 

SET BY EXAMINING 

SVC 203 HALFWORD CODE 

4C 

FREEFLG1 

0 A*1 



Values Defined in FREEFLG1 


80 

FRF1C 

CONDITIONAL REQUEST 


40 

FRF1V 

VARIABLE REQUEST 

[ 

20 

FRF1N 

NUCLEUS REQUEST 

K 

10 

FRF1E 

FREE (VS FRET) REQUEST 


08 

FRF1L 

LOW-CORE IS OK 


04 

FRF1H 

HIGH-CORE IS OK 


02 

FRF1M 

MESSAGES WANTED ON ERROR 


01 

FRF1B 

•TYPCALL 1 EQUALS *BALR f IN MACRO 



THE FOLLOWING BYTE HOLDS FLAGS INTERNAL TO THE DMSFRE ROUTINE. 


/f 

■ 


V 
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FRDSECT 


DISP NAME LEN KEY DESCRIPTION 

4D FREEFLG2 0 A*2 


Values Defined in FREEFLG2 


80 

FRF2CL 


CLEANUP FLAG 

40 

FRF2SVP 


SCHVPGE FLAG 

20 

FRF2N0I 


2ND INITIALIZATION ROUTINE HAS 

NOT YET BEEN CALLED 

10 

FRF2CKE 


DO A 'CHECK' EACH TIME FREE 

OR FRET IS CALLED 

08 

FRF2CKT 


DO A CHECK THIS TIME 

04 

FRF2CKX 


EXECUTING 'CHECK' ROUTINE NOW 

02 

FRF2N0SK 


THE STORAGE KEYS HAVE NOT BEEN 

INITIALIZED 

01 

FRF2N0KP 


SET KEYPROTECT IS OFF 

FREE l 

CHAIN ELEMENT 

DESCRIPTION 


^POINTER 

4 

POINTER TO NEXT FREE ELEMENT 

04 

SIZE 

4 

SIZE OF THIS ELEMENT IN BYTES 

08 

FBDFREE 

4 

POINTER TO FREE BLOCK FOR FBD IN CACHE ONLY 

50 

FRTSAVE 

8 

TEMP SAVE AREA 

58 

FROPSW 

8 

PROGRAM OLD PSW 

60 

FRTSAVE1 

8 

TEMP SAVE AREA FOR CACHE DSECTS 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ACALL 

0048 

# # 

FREEHU 

0030 

# # 

FRF2CKE 

004D 

10 

NUCCODE 

.... 

02 

AFREETAB 

0040 

# # 

FREELN 

0000 


FRF2CKT 

004D 

08 

NUCKEY 

.... 

F0 

BLOCKLEN 


10 

FREEL0W1 

0044 

# # 

FRF2CKX 

004D 

04 

NUM 

.... 

04 

FBDFREE 


08 

FREELU 

0010 

* m 

FRF2CL 

004D 

80 

POINTER 

.... 

00 

FLAGS 


0C 

FRF1B 

004C 

01 

FRF2N0I 

004D 

20 

SIZE 

004D 

04 

FLCLB 


40 

FRF1C 

004C 

80 

FRF2N0SK 

004D 

02 

SKEY 

• • • • 

0D 

FLCLN 


80 

FRF1E 

004C 

10 

FRF2SVP 

004D 

40 

SYSCODE 

• • • • 

05 

FLHC 


20 

FRF1H 

004C 

04 

FROPSH 

0058 

# t 

TCODE 

• « • • 

0E 

FLNU 


10 

FRF1L 

004C 

08 

FRTSAVE 

0050 

# # 

TRNCODE 

• • • • 

03 

FLPA 


08 

FRF1M 

004C 

02 

FRTSAVE1 

0060 

# # 

USARCODE 

• • • • 

04 

FREEFLG1 

004C 


FRF1N 

004C 

20 

MAX 

• • • • 

08 

USERCODE 

• • • • 

01 

FREEFLG2 

FREEHN 

004D 

0020 


FRF1V 

004C 

40 

MAXC0DE 

.... 

05 

USERKEY 

.... 

EO 
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FSCBD: FILE SYSTEM CONTROL BLOCK 

FSCBD is a PLIST defined for general use by routines that use the CMS file system. 
FSCBD is generated when the user invokes the FSCBD macro. 


0 

FSCBCOMM 

8 

FSCBFN 

10 

FSCBFT 

18 

FFSCBFM | FSCBITNO 

FSCBBUFF 

20 

FSCBSIZE 

FSCBFV | FSCBNOIT 

28 

FSCBNORD 

FSCBAITN 

30 

FSCBANIT 

FSCBWPTR 

38 

FSCBRPTR 



HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

FSCBCOMM 

8 

FILE SYSTEM COMMAND (RDBUF,WRBUF,ETC) 

8 

FSCBFN 

8 

FILENAME 

10 

FSCBFT 

8 

FILETYPE 

18 

FSCBFM 

2 

FILEMODE 

1A 

FSCBITNO 

2 

RELATIVE RECORD NUMBER TO BE READ/WRITTEN 

1C 

FSCBBUFF 

4 

ADDRESS OF R/W BUFFER OR OF STATEFST 

20 

FSCBSIZE 

4 

LENGTH OF BUFFER 

24 

FSCBFV 

2 

RECFM - C'F' OR C'V' 

25 

FSCBFLG 

1 

FLAG BYTE 

Values Defined in 

40 FSCBITAV 

20 FSCBEPL 

01 FSCBRCAV 

i FSCBFLG 

ITEM AVAILABLE 

EXTENDED PLIST 

PREVIOUS RECORD NULL 

26 

FSCBNOIT 

2 

NUMBER OF RECORDS TO BE READ/WRITTEN 

28 

FSCBNORD 

4 

NUMBER OF BYTES ACTUALLY READ 

2C 

FSCBAITN 

4 

EXTENDED RECORD NUMBER 

30 

FSCBANIT 

4 

EXTENDED NUMBER OF RECORDS 

34 

FSCBWPTR 

4 

EXTENDED WRITE POINTER 
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DISP NAME LEN KEY DESCRIPTION 

38 FSCBRPTR 4 EXTENDED READ POINTER 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


FSCBAITN 002C .. 
FSCBANIT 0030 . . 
FSCBBUFF 001C .. 
FSCBCOMM 0000 . . 
FSCBEPL 0025 20 


FSCBFLG 0025 . 
FSCBFM 0018 . 
FSCBFN 0008 . 
FSCBFT 0010 . 
FSCBFV 0024 . 


FSCBITAV 0025 40 
FSCBITNO 001A .. 
FSCBNOIT 0026 .. 
FSCBNORD 0028 . . 


FSCBRCAV 0025 01 
FSCBRPTR 0038 . . 
FSCBSIZE 0020 .. 
FSCBNPTR 0034 .. 
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FSTD: FILE STATUS TABLE ENTRY DSECT 

FSTD describes the fields in a 40-byte file status table entry as found by STATE/ 
STATEW, DMSLF or DMSLFSW. FSTD is functionally equivalent to the FSTSECT DSECT. 


0 

FSTFNAME 

8 

FSTFTYPE 

10 

FSTDATEW 

FSTTIMEW 

FSTWRPNT 

FSTRDPNT 

18 

FSTFMODE 

FSTRECCT 

FSTFCLPT 

F*1 | FX* 

20 

FSTLRECL 

FSTBLKCT 

FSTYEARW 

28 

FSTFOP 

FSTADBC 

30 

FSTAIC 

FX3 | F*4 

FSTADATI 

38 

FSTADATI 

(cont.) 

///////////////////// 


SIZE 

FST SIZE IN BYTES (FSTDSIZE) 40 
HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

FSTFNAME 

8 

FILE NAME 

8 

FSTFTYPE 

8 

FILE TYPE 


10 

FSTDATEW 

2 

DATE LAST WRITTEN - MMDD 

12 

FSTTIMEW 

2 

TIME LAST WRITTEN - HHMM 

14 

FSTWRPNT 

2 

WRITE POINTER - ITEM NUMBER 

16 

FSTRDPNT 

2 

READ POINTER - ITEM NUMBER 

18 

FSTFMODE 

2 

FILE MODE - LETTER AND NUMBER 

1A 

FSTRECCT 

2 

NUMBER OF LOGICAL RECORDS 

1C 

FSTFCLPT 

2 

FIRST CHAIN LINK POINTER 

IE 

FSTRECFM 

1 FX1 

RECORD FORMAT - F OR V 
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DISP NAME LEN KEY DESCRIPTION 


IF FSTFLAGS 1 F*2 FST FLAG BYTE 


Values Defined in FSTFLAGS 


00 

FSTRODSK 



READ/ONLY DISK 

CO 

FSTXWDSK 



EXTENSION OF R/W DISK 

80 

FSTRWDSK 



READ/WRITE DISK 

40 

FSTXRDSK 



EXTENSION OF R/O DISK 

40 

FSTDIA 



ITEM AVAILABLE 

20 

FSTEPL 



EXTENDED PLIST 

07 

FSTFILEA 



THE FILE IS ACTIVE 

04 

FSTACTRD 



ACTIVE FOR READING 

02 

FSTACTWR 



ACTIVE FOR WRITING 

01 

FSTDRA 



PREVIOUS RECORD NULL 

01 

FSTACTPT 



ACTIVE FROM A POINT 

20 

FSTLRECL 

4 


LOGICAL RECORD LENGTH 

24 

FSTBLKCT 

2 


NUMBER OF 800 BYTE BLOCKS 

26 

FSTYEARW 

2 


YEAR LAST WRITTEN 

28 

FSTFOP 

4 


ALTERNATE FILE ORIGIN POINTER 

2C 

FSTADBC 

4 


ALTERNATE NUMBER OF DATA BLOCKS 

30 

FSTAIC 

4 


ALTERNATE ITEM COUNT 

34 

FSTNLVL 

1 

F*3 

NUMBER OF POINTER BLOCK LEVELS 

35 

FSTPTRSZ 

1 

F*4 

LENGTH OF A POINTER ELEMENT 

36 

FSTADATI 

6 


ALTERNATE DATE/TJMECYY MM DD HH 

3C 


4 


RESERVED 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


FSTACTPT 001F 01 
FSTACTRD 001F 04 
FSTACTWR 001F 02 
FSTADATI 0036 .. 
FSTADBC 002C .. 
FSTAIC 0030 .. 
FSTBLKCT 0024 . . 
FSTDATEW 0010 .. 


FSTDIA 001F 40 
FSTDRA 001F 01 
FSTDSIZE .... 40 
FSTEPL 001F 20 
FSTFCLPT 001C .. 
FSTFILEA 001F 07 
FSTFLAGS 001F .. 
FSTFMODE 0018 .. 


FSTFNAME 0000 . 
FSTFOP 0028 . 
FSTFTYPE 0008 . 
FSTLRECL 0020 . 
FSTNLVL 0034 . 
FSTPTRSZ 0035 . 
FSTRDPNT 0016 . 
FSTRECCT 001A . 


FSTRECFM 001E .. 
FSTRODSK 001F 00 
FSTRWDSK 001F 80 
FSTTIMEW 0012 .. 
FSTWRPNT 0014 .. 
FSTXRDSK 001F 40 
FSTXWDSK 001F CO 
FSTYEARW 0026 .. 
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FSTSECT: FILE STATUS TABLE 

FSTSECT defines the file status table (FST) which describes the attributes of a file 
on a CMS virtual disk. FSTSECT is invoked by the macro FSTB. 


0 

FSTN 

8 

FSTT 

10 

FSTD 

FSTWP 

FSTRP 

18 

FSTM | FSTIC 

FSTFCL 

FXl | FX2 

20 

FSTIL 

FSTDBC 

FSTYR 

28 

FSTFOP 

FSTADBC | 

30 

FSTAIC 

F*3 F*4 

FSTADATI 

38 

FSTADATI (cont.) 



SIZE 

LENGTH OF AN EDF FST. 
LENGTH OF FSTSECT IS 

HEX 


DISP 

NAME 

LEN KEY 

0 

FSTN 

8 

8 

FSTT 

8 

10 

FSTD 

4 

14 

FSTWP 

2 

16 

FSTRP 

2 

18 

FSTM 

2 

1A 

FSTIC 

2 

1C 

FSTFCL 

2 

IE 

FSTFV 

1 FXl 


(FSTL2) 40 
(FSTL ) 28 

DESCRIPTION 

FILE NAME 
FILE TYPE 

DATE/TIME LAST WRITTEN 
WRITE POINTER (ITEM #) 
READ POINTER (ITEM #) 

FILE MODE 

ITEM COUNT 

FIRST CHAIN LINK 

FIXED(F)/VARIABLE(V) FLAG 


(f ^ 

L . 

v. ■/ 
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DISP NAME LEN KEY DESCRIPTION 


IF FSTFB 1 F*2 FLAG BYTE (IF USED) 


Values Defined in FSTFB 


00 FSTFRO 
CO FSTFRWX 
80 FSTFRN 
40 FSTFROX 
40 FSTITAV 
20 FSTEPL 
07 FSTFACT 
04 FSTFAR 
02 FSTFAW 
01 FSTFAP 
01 FSTRECAV 


READ-ONLY DISK 

READ-ONLY EXTENSION OF READ-ONLY DISK 
READ-NRITE DISK 

READ-ONLY EXTENSION OF READ-NRITE DISK 
ITEM AVAILABLE 
EXTENDED PLIST 

FILE "ACTIVE” - ONE OF THE FOLLOWING: 
FILE ACTIVE FOR READING 
FILE ACTIVE FOR WRITING 
FILE ACTIVE FROM A "POINT” 

PREVIOUS RECORD NULL 


20 

FSTIL 

4 


(MAXIMUM) 

ITEM LENGTH 

20 

FSTFWDP 

4 


FORWARD POINTER (TO NEXT HYPERBLOCK IN 

24 

FSTDBC 

2 


NUMBER OF 

DATA BLOCKS 

24 

FSTBKWD 

2 


BACKWARD POINTER (TO PREVIOUS HYPERBLK 

26 

FSTYR 

2 


YEAR 


28 

FSTFOP 

4 


ALTERNATE 

FILE ORIGIN POINTER 

2C 

FSTADBC 

4 


ALTERNATE 

NUMBER OF DATA BLOCKS 

30 

FSTAIC 

4 


ALTERNATE 

ITEM COUNT 

34 

FSTNLVL 

1 

F*3 

NUMBER OF 

POINTER BLOCK LEVELS 

35 

FSTPTRSZ 

1 

F*4 

LENGTH OF 

A POINTER ELEMENT 

36 

FSTADATI 

6 


ALTERNATE 

DATE/TIME(YY MM DD HH MM SS) 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


FSTADATI 

0036 


FSTFAR 

001F 

04 

FSTFV 

001E 

# # 

FSTN 

0000 .. 

FSTADBC 

002C 


FSTFAW 

001F 

02 

FSTFWDP 

0020 

# # 

FSTNLVL 

0034 .. 

FSTAIC 

0030 


FSTFB 

001F 

, , 

FSTIC 

001A 

# # 

FSTPTRSZ 

0035 .. 

FSTBKWD 

0024 


FSTFCL 

001C 

, . 

FSTIL 

0020 

# # 

FSTRECAV 

001F 01 

FSTD 

0010 


FSTFOP 

0028 

, , 

FSTITAV 

001F 

40 

FSTRP 

0016 .. 

FSTDBC 

0024 


FSTFRO 

001F 

00 

FSTL 

0000 

28 

FSTT 

0008 .. 

FSTEPL 

001F 

20 

FSTFROX 

001F 

40 

FSTL2 

0000 

40 

FSTWP 

0014 .. 

FSTFACT 

001F 

07 

FSTFRW 

001F 

80 

FSTM 

0018 

# * 

FSTYR 

0026 .. 

FSTFAP 

001F 

01 

FSTFRWX 

001F 

CO 
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FVSECT: FIXED VARIABLE STORAGE WORK AREA FOR CMS FILE SYSTEM 

FVSECT is used mainly by file management and I/O routines. FVS contains save areas; 
work areas; and commonly used constants. A typical use of FVS is when a reentrant 
I/O routine requires a work area or save area, since the routine cannot modify 
itself. FVSECT is invoked by the FVS macro. 


DISKSSEG 


i 



r 


REGSAV3 

I 

78 

: 


RWFSTRG 

: 

CO 

: 


RESERVED 

= 

DO 



i 



= 


REGSAVO 

: 

110 


TRKLSAVE 

T f>i T 



REGSAV1 


150 

| F*2 

F65535 

158 

FW4 

VFREE 

160 

F100 

VFRET 

168 

JSR0 

JSR1 

17 0 

RWMFD 

F800 

178 


FVSDSKA 

180 

DSKLOC 

RWCNT 

188 

DSKADR 

ADTADD 

190 

DSKPTRSZ 

DSKCHAIN 

198 

DSKL0C2 

RWCNT2 

1A0 

DSKADR2 

ADTADD2 

1A8 

DSKPTRS2 

DSKCHAI2 
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FVSECT 


1B0 

1B8 

ICO 

1C8 

IDO 

1D8 

1E0 

1E8 

1F0 

1F8 

200 

208 

210 

218 

220 

228 

230 

238 

240 

248 

250 

258 

260 

268 

270 

2E8 


FINISLST 




FFF 

FFE 

FFD 

SIGNAL 

F*3 | F*4 

F*5 | F*6 

F*7 | F*8 

FVSERAS0 

FVSERAS1 

FVSERAS2 

FVSERAS3 

FVSERAS4 

FVSERAS5 

READCNT 

FVSERAS6 

FVSFSTN 

FVSFSTT 

FVSFSTDT 

FVSFSTWP 

FVSFSTRP 

FVSFSTM | FVSFSTIC 

FVSFSTCL 

F*9 | FX10 

FVSFSTIL 

FVSFSTDB 

FVSFSTYR 

FVSFSTAD 

FVSFSTAC 

FVSFSTHP 


FVSN 

FVST 

FVSD 

FVSWP 

FVSRP 

FVSM | FVSIC 

FVSFCL 

F*ll| F*12 

FVSIL 

FVSDBC 

FVSYR 

FVSF0P 

FVSADBC j 

FVSAIC 

F*13| F*14 

FVSADATI 

continued 

////////////////////// | 


FVSDI0PL 


FVS16M0D 


328 

330 


FVSPATCH 


PATCH AREA 

_J 
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380 

3BC 

3F8 

418 
420 
450 
458 
46 0 
490 
498 
4A0 

4D0 



1 

REGSAVH0 


REGSAVHl 

1 

1 

1_ 

1 

FVSHSHSV 

_1 

| F*15| RESERVED 



FVSACFR 

_1 

RESERVED 

FX16 


:: 

FVSACGR 

_J 

RESERVED 

FX17 


= 

FVSLAD 

_ _ j 



////////////////////// 


SIZE 

LENGTH OF SHORT FST (FVSL1) 28 
LENGTH OF AN EOF FST (FVSL2) 40 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 


0 

DISKSSEG 

60 

(1) FOR FSTLKP, FSTLKW, ACTLKP, TRKLKP, 

QQTRK 

3C 

REGSAV3 

60 

(2) FOR RDBUF, HRBUF, FINIS, STATE, POINT 

78 

RWFSTRG 

72 

(3) REMAINING STORAGE FOR RDBUF, WRBUF, 

FINIS 

CO 


20 

RESERVED FOR FUTURE USE 



SAVE AREA FOR L0HEST LEVEL ROUTINES (READMFD, RELUFD, UPDISK, TYPSRCH, ADTLKW) 


D4 

REGSAVO 

60 

(i) 

SAVED R0-R15 

D4 

TRKLSAVE 

0 

FOR 

TRKLKP/X ONLY NHEN CALLED BY QQTRK/X 



3 

FIRST 3 BYTES OF RETURN-CODE 

113 

ERRCODO 

1 FX1 

(3) 

ERROR-CODE GOES HERE 


SAVE AREA FOR NEXT-TO-LOWEST LEVEL ROUTINES (READFST, ERASE, ALTER, 
INTSVC-LOADM 

114 REGSAV1 60 (1) 

150 3 

153 ERRC0D1 1 F*2 (3) 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

154 

F65535 

4 

= X f 0000FFFF 1 

158 

FN4 

4 


15A 

HN4 


FN4+2 

15C 

VFREE 

4 

(1) 

160 

F100 

4 

(2) 

164 

VFRET 

4 

(INTO R15) 

168 

JSR0 

4 

R0 AND ... 

16C 

JSR1 

4 

R1 SAVED HERE FOR FRET CALLS 

PARAMETER LIST 

TO READ/WRITE MFD 

170 

RNMFD 

4 

CORE-ADDRESS 

174 

F800 

4 

800 BYTES 

17C 

FVSDSKA 

4 

ADDRESS OF ACTIVE-DISK-TABLE 

180 

DSKLST 

0 

ALL-PURPOSE RDTK/WRTK P-LIST... 

180 

DSKLOC 

4 

CORE LOCATION OF ITEM 

184 

RNCNT 

4 

BYTE-COUNT (USUALLY 800) 

188 

DSKADR 

4 

DISK ADDRESS OF ITEM 

Values Defined in DSKADR 

80 

FNADDR 


THE HIGH BIT OF DSKADDR INDICATES EXTENDED 
PLIST (FULLNORD DISK ADDRESS, POINTER SIZE 
PLIST CHAIN POINTER) 

18C 

ADTADD 

4 

ADDRESS OF CORRECT ACTIVE-DISK-TABLE 

190 

DSKPTRSZ 

4 

DISK POINTER SIZE IF FULLNORD ADDRESS 

194 

DSKCHAIN 

4 

PLIST CHAIN POINTER 

198 

DSKLST2 

4 

ALL-PURPOSE RDTK/NRTK P-LIST 

198 

DSKL0C2 

0 

CORE LOCATION OF ITEM 

19C 

RWCNT2 

4 

BYTE-COUNT 

1A0 

DSKADR2 

4 

DISK ADDRESS OF ITEM 

1A4 

ADTADD2 

4 

ADDRESS OF ADT (NOT USED IN CHAINED PLIST) 

1A8 

DSKPTRS2 

4 

DISK POINTER SIZE IF FULLNORD ADDRESS 

1AC 

DSKCHAI2 

4 

PLIST CHAIN POINTER 

1AC 

DSKLEN 

4 

PLIST CHAIN POINTER 

1B0 

FINISLST 

8 

P-LIST TO CLOSE ALL FILES 

1B8 


8 


ICO 


8 


1C8 


2 


1CA 

FFF 

2 

MEANS NO SIGNIFICANT DATA PAST 215TH BYTE 
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DISP NAME LEN KEY DESCRIPTION 

ICC FFE 2 1968-ERA MFD STILL SUPPORTED ON INPUT ONLY 

ICE FFD 2 NEWEST SIGNAL FOR FULL 2314 HANDLING 

SIGNAL = SCRATCH HALFWORD USED BY READMFD OR ERASE 
IDO SIGNAL 2 = 0000, X'FFFF', X'FFFE', OR X'FFFD' 

1D1 SWTCH 1 00, FF, FE, OR FD 

1D2 UFDBUSY 1 F*3 NONZERO MEANS *UFD IS BUSY BEING UPDATED' 

Values Defined in UFDBUSY 

80 WRBIT WRBUF 

40 UPBIT UPDISK - READMFD 

20 FNBIT FINIS 

10 ERBIT ERASE - ALTER - READFST 

08 DIOBIT RDTK/WRTK 

The following bits are for routines that do not update the disk, but can 
not be interrupted by a KX anyway. 

02 ABNBIT DMSABN — ABEND RECOVERY ROUTINE 

01 ITSBIT DMSITS — SVC HANDLING ROUTINE 

1D3 KXFLAG 1 F*4 'KX' FLAGS 

Values Defined in KXFLAG 

80 KXWANT KX WANTED ASAP 

01 KXWSVC HOLD KX UNTIL ANY SVC ACTIVITY 

1D4 FVSFLG0 1 F*5 FLAG FOR GENERAL COMMUNICATION 

Values Defined in FVSFLG0 


80 FVSUFSTC DISK/TAPE DUMP - DMSBRD TO USE 






FVS FST COPY 

TO 

BUILD 

AFT 

1D5 

FLGSAVE 

1 

F*6 

FOR SCRATCH 

USE 

(E.G. 

BY RELUFD) 

1D6 

FVSFLAG 

1 

F*7 

(FOR GENERAL 

USE 

: - as 

NEEDED) 

MISCELLANEOUS 

STORAGE 

USED BY ERASE 

(OR 

ALTER) 


1D7 

ERSFLAG 

1 

FX8 

FLAG FOR USE 

BY 

ERASE 

OR ALTER 


1D8 FVSERAS0 4 (1) - R0 TO/FROM FSTLKW (FOR ERASE) 

1DC FVSERAS1 4 (2) - R1 TO ACTLKP OR FSTLKW (FOR ERASE) 

1E0 FVSERAS2 4 (3) ADDRESS OF FREE STORAGE USED BY ERASE 

1E4 FVSERAS3 4 POINTERS PER BLOCK IN FILE BEING ERASED 

1E8 FVSERAS4 4 POINTER SIZE OF FILE BEING ERASED 

1EC FVSERAS5 4 HBLK ADDRESS OF FILE BEING ERASED 

1F0 READCNT 4 CURRENT READ COUNT (DMSBRD) 

1F4 FVSERAS6 4 AFT ADDRESS OF FILE BEING ERASED 

FILE STATUS TABLE (FST) COPY FROM 'STATE' 

1F8 STATEFST 0 FST OF 'STATED* FILE 

CDF FST COPY (40 BYTES) 
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FVSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

1F8 

FVSFSTN 

8 

FILENAME 

“0 

200 

FVSFSTT 

8 

FILETYPE 

-8 


208 

FVSFSTDT 

4 

DATE/TIME LAST WRITTEN -16,18 

20C 

FVSFSTWP 

2 

WRITE POINTER (ITEM ID) -20 

20E 

FVSFSTRP 

2 

READ POINTER (ITEM ID) -22 

210 

FVSFSTM 

2 

FILEMODE -24 

212 

FVSFSTIC 

2 

N 1 ITEMS IN FILE -26 

214 

FVSFSTCL 

2 

DA(FIRST CHAIN LINK) -28 

216 

FVSFSTFV 

1 FX9 

FIXED(F) / VARIABLE(V) INDICATOR 

217 

FVSFSTFB 

1 FX10 

FLAG BYTE -31 

218 

FVSFSTIL 

4 

L 1 ITEMS -32 

21C 

FVSFSTDB 

2 

N 1 DATA BLOCKS -36 

21E 

FVSFSTYR 

2 

YEAR LAST WRITTEN -38 

POINTERS ASSOCIATED WITH BOTH FST VERSIONS 

220 

FVSFSTAD 

4 

A(ADT FOR THIS FILE) 

220 

STATER0 

4 


224 

FVSFSTAC 

4 

A(REAL FST ENTRY FOR THIS FILE) 

224 

STATER1 

4 


228 

FVSFSTHP 

4 

A(HBLK HOLDING THIS FST) 

EDF 

FST COPY AREA (64 BYTES) 

230 

STATFST2 

0 

EDF FORMAT FST COPY 

FILE 

STATUS TABLE (FILE 

DIRECTORY) BLOCK 

230 

FVSN 

8 

FILE NAME 

238 

FVST 

8 

FILE TYPE 

240 

FVSD 

4 

DATE/TIME LAST WRITTEN 

244 

FVSWP 

2 

WRITE POINTER (ITEM #) 

246 

FVSRP 

2 

READ POINTER (ITEM #) 

248 

FVSM 

2 

FILE MODE 

24A 

FVSIC 

2 

ITEM COUNT 

24C 

FVSFCL 

2 

FIRST CHAIN LINK 

24E 

FVSFV 

1 FX11 

FIXED(F)/VARIABLE(V) FLAG 
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DISP 

NAME LEN 

KEY 

DESCRIPTION 




/?' 

24F 

FVSFB 

1 

F*12 

FLAG BYTE (IF USED) 





Values Defined in FVSFB 





(Applicable only 

to 

1 STATEFST 1 copy of FST-entry after successful 

1 STATE* or 



STATEN 1 call) 








CO 

FVSFRWX 



READ-ONLY EXTENSION OF READ-ONLY DISK 





80 

FVSFRN 



READ-NRITE DISK 





40 

FVSFROX 



READ-ONLY EXTENSION OF READ-WRITE DISK 





07 

FVSFACT 



FILE "ACTIVE” - ONE OF THE FOLLOWING: 





04 

FVSFAR 



FILE ACTIVE FOR READING 





02 

FVSFAW 



FILE ACTIVE FOR WRITING 





01 

FVSFAP 



FILE ACTIVE FROM A "POINT" 





00 

FVSFRO 



READ-ONLY DISK 





Applicable to 

FSCBFLG in PLIST 





40 

FVSITAV 



ITEM AVAILABLE 





20 

FVSEPL 



EXTENDED PLIST 





01 

FVSRECAV 



PREVIOUS RECORD NULL 





250 

FVSIL 

4 


(MAXIMUM) ITEM LENGTH 





254 

FVSDBC 

2 


NUMBER OF DATA BLOCKS 





256 

FVSYR 

2 


YEAR 





FSTEDF EXTENSION 








258 

FVSFOP 

4 


ALTERNATE FILE ORIGIN POINTER 





25C 

FVSADBC 

4 


ALTERNATE NUMBER OF DATA BLOCKS 





260 

FVSAIC 

4 


ALTERNATE ITEM COUNT 





264 

FVSNLVL 

1 

F*13 

NUMBER OF POINTER BLOCK LEVELS 





265 

FVSPTRSZ 

1 

F*14 

LENGTH OF A POINTER ELEMENT 





266 

FVSADATI 

6 


ALTERNATE DATE/TIMECYY MM DD HH MM SS) 





26C 


4 


RESERVED 





FST HYPER-BLOCK 

PARAMETERS 





324 

FVSBKWD 



BACKWARD POINTER (TO PREVIOUS HYPERBLK 

IN 

CORE) 


V 

V 

320 

FVSFWDP 



FORWARD POINTER (TO NEXT HYPERBLOCK IN 

CORE) 



270 

FVSDIOPL 120 


DIO MULTI-ELEMENT PLIST 





2E8 

FVS16M0S 

64 


USED BY DMSMOD TO LOAD TRANSIENT UP TO 
DISK ADDRESS AND SAVED HERE 

16 




328 

FVSPATCH 

0 


PATCH AREA FOR CMS NUCLEUS 





328 


8 


EYE CATCHER 





330 


80 


PATCH AREA 





380 

REGSAVHO 

60 


REG. SAVE AREA FOR DMSHTB 





3BC 

REGSAVH1 

60 


REG. SAVE AREA FOR DMSLFS 





3F8 

FVSHSHV 

32 


SAVE/WORK AREA FOR HASHING 




X 

V 
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DISP NAME LEN KEY DESCRIPTION 

418 FVSHFLAG 1 F*15 FLAG FOR HASHING/HYPMAP 


Values Defined in FVSHFLAG 



80 HTBRW 

40 HASHTRY 
20 CANTHASH 



DMSHTB IS MAKING R/W HASH TABLE 
HASH PROBE OF HYPERBLK BY DMSLFS 
DMSLFS CAN'T USE HASHING 

419 


3 


UNUSED 

41C 

FVSACFR 

60 


SAVE REGS 0-14 FOR DMSACF 

458 


3 


UNUSED 

45B 

FVSACFE 

1 

FX16 

SAVE REG. 15(ERROR) FOR DMSACF 

45C 

FVSACGR 

60 


SAVE REGS 0-14 FOR DMSACG 

498 


3 


UNUSED 

49B 

FVSACGE 

1 

F*17 

SAVE REG 15CERROR) FOR DMSACG 

49C 

FVSLAD 

64 


SAVE AREA FOR DMSLAD 


CROSS REFERENCE (Name Piso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ABNBIT 

01D2 

02 

FVSD 

0240 


FVSFSTHP 

0228 


F100 

0160 

m # 

ADTADD 

018C 

# # 

FVSDBC 

0254 


FVSFSTIC 

0212 


F65535 

0154 


ADTADD2 

01A4 

# # 

FVSDIOPL 

0270 


FVSFSTIL 

0218 


F800 

0174 

, , 

CANTHASH 

0418 

20 

FVSDSKA 

017C 


FVSFSTM 

0210 


HASHTRY 

0418 

40 

DIOBIT 

01D2 

08 

FVSELMNL 

0326 


FVSFSTN 

01F8 


HTBRW 

0418 

80 

DISKSSEG 

0000 


FVSELMNT 

0325 


FVSFSTRP 

020E 


HW4 

015A 

% # 

DSKADR 

0188 


FVSEPL 

024F 

20 

FVSFSTT 

0200 


ITSBIT 

01D2 

01 

DSKADR2 

01A0 


FVSERAS0 

01D8 


FVSFSTHP 

020C 


JSRO 

0168 

• • 

DSKCHAIN 

0194 


FVSERAS1 

01 DC 


FVSFSTYR 

021E 


JSR1 

016C 

# # 

DSKCHAI2 

01AC 


FVSERAS2 

01E0 


FVSFV 

024E 


KXFLAG 

01D3 

9 # 

DSKLEN 

01AC 


FVSERAS3 

01E4 


FVSFWDP 

0320 


KXWANT 

01D3 

80 

DSKLOC 

0180 


FVSERAS4 

01E8 


FVSHFLAG 

0418 


KXWSVC 

01D3 

01 

DSKL0C2 

0198 


FVSERAS5 

01 EC 


FVSHSHV 

03F8 


READCNT 

01F0 


DSKLST 

0180 


FVSERAS6 

01F4 


FVSIC 

024A 


REGSAVHO 

0380 


DSKLST2 

0198 


FVSFACT 

024F 

07 

FVSIL 

0250 


REGSAVH1 

03BC 


DSKPTRSZ 

0190 


FVSFAP 

024F 

01 

FVSITAV 

024F 

40 

REGSAVO 

00D4 


DSKPTRS2 

01A8 


FVSFAR 

024F 

04 

FVSL 

0000 

28 

REGSAV1 

0114 


ERBIT 

01D2 

io 

FVSFAN 

024F 

02 

| FVSLAD 

049C 

9 # 

REGSAV3 

003C 


ERRCODO 

0113 


FVSFB 

024F 


FVSL 1 

0000 

28 

RWCNT 

0184 


ERRC0D1 

0153 


FVSFCL 

024C 


FVSL2 

0000 

40 

RWCNT2 

019C 


ERSFLAG 

01D7 


FVSFLAG 

01D6 


FVSM 

0248 


RWFSTRG 

0078 


FFD 

01CE 


FVSFLG0 

01D4 


FVSN 

0230 


RWMFD 

0170 


FFE 

01CC 


FVSFOP 

0258 


| FVSNDST 

0270 


SIGNAL 

01D0 


FFF 

01CA 


FVSFRO 

024F 


FVSNLVL 

0264 


STATEFST 

01F8 


FINISLST 

01B0 


FVSFROX 

024F 

40 

FVSPATCH 

02E8 


STATERO 

0220 


FLGSAVE 

01D5 


FVSFRW 

024F 

80 

FVSPTRSZ 

0265 


STATER1 

0224 


FNBIT 

01D2 

20 

FVSFRWX 

024F 

CO 

FVSRFCAV 

024F 

oi 

STATFST2 

0230 


FVSADATI 

0266 


FVSFSTAC 

0224 


FVSRP 

0246 


SWTCH 

01D1 


FVSADBC 

025C 


FVSFSTAD 

0220 


FVST 

0238 


TRKLSAVE 

00D4 


FVSAIC 

0260 


FVSFSTCL 

0214 


FVSUFSTC 

01D4 

80 

UFDBUSY 

01D2 


FVSACFE 

045B 


FVSFSTDB 

021C 


FVSWP 

0244 


UPBIT 

01D2 

40 

FVSACFR 

041C 


FVSFSTDT 

0208 


FVSYR 

0256 


VFREE 

015C 


FVSACGE 

049B 


FVSFSTFB 

0217 


FWADDR 

0188 

80 

VFRET 

0164 


FVSACGR 

FVSBKWD 

045C 

0320 


FVSFSTFV 

0216 


FH4 

0158 

• • 

WRBIT 

01D2 

80 
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HASHTAB: HASH TABLE COMPLEX 

HASHTAB is used exclusively by file management to reduce the paging overhead when 
searching for a file on a read/write disk. It contains a header plus a pointer 
array with the address of each hyperblock associated with the disk, and a scatter 
index table with a 3-byte entry for each file on the disk. HASHTAB is invoked via 
the HASHTAB macro. 





SIZE 

Size of HASHTAB header in bytes (HSHLENHD) 10 
Size of an address entry (HADDLEN) 04 
Size of a Scatter Table slot (SLOTSIZE) 03 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 HYPTSIZE 4 Size of Hyperblock Pointer Array (bytes) 

4 SCTSIZE 4 Size of Scatter Table (bytes) 

8 NSCTSLOT 4 Number of 3 byte slots in Scatter Table 

C NSCTUSED 4 Number of used Scatter Table slots 

HYPERBLOCK POINTER ARRAY x 

0 HYPTABLE 0 Start of Hyperblock Address Portion V y 
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DISP NAME LEN KEY DESCRIPTION 

0 HYPADD 4 Address of hyperblock 


SCATTER INDEX TABLE 
0 SCATTRTB 0 

0 HTABINDX 2 

2 SECHBYTE 1 


Start of Scatter Table Portion 
Index into hyperblock pointer array 
Secondary hash byte 


HASHTAB 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


HADDLEN .... 04 
HSHLENHD .... 10 
HTABINDX 0000 .. 


HYPADD 0000 .. 
HYPTABLE 0000 . . 
HYPTSIZE 0000 . . 


NSCTSLOT 0008 . . 
NSCTUSED 000C . . 
SCATTRTB 0000 . . 


SCTSIZE 0004 .. 
SECHBYTE 0002 .. 
SLOTSIZE .... 03 
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HYPMAP: HYPERBLOCK MAPPING TABLE 

HYPMAP is the hyperblock mapping table for read-only disks. It contains a header 
plus an entry for each 4K page of hyperblocks (or FSTs for a STAT) associated with 
the accessed disk. HYPMAP is used mainly by file management to reduce the paging 
overhead when searching for a file on a read-only disk. HYPMAP is invoked via the 
HYPMAP macro. 


(0) 

HYPMSIZE 

HYPMENTS 

0 

HYPMBLKC j ///////// 

HYPMAHYP 

8 

HYPMFN 

10 

HYPMFT 


SIZE 

Length of a table entry in bytes (HYPMLEN ) 18 
Size of header in doublewords (HYPMHSIZ) 01 

HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

HYPMSIZE 

4 

Size of table in Doublewords 

4 

HYPMENTS 

4 

Number of entries in table 

8 

HYPTAB 

0 

Start of table 

Table 

Entries 



0 

HYPMBLKC 

2 

Number of hyperblocks/FST*s on the page 
mapped by this table entry 

2 


2 

Reserved 

4 

HYPMAHYP 

4 

Pointer to first hyperblock/FST 

8 

HYPMFID 

0 

ID of last file in this block 

8 

HYPMFN 

0 

Filename 

8 

HYPMFN1 

4 

First half of filename 

C 

HYPMFN2 

4 

Second half of filename 

10 

HYPMFT 

0 

Filetype 

10 

HYPMFT1 

4 

First half of filetype 

14 

HYPMFT2 

4 

Second half of filetype 

18 

HYPMNEXT 

0 

Start of next entry 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


HYPMAHYP 0004 
HYPMBLKC 0000 
HYPMENTS 0004 
HYPMFID 0008 


HYPMFN 0008 .. 
HYPMFN1 0008 .. 
HYPMFN2 000C .. 
HYPMFT 0010 .. 


HYPMFT1 0010 .. 
HYPMFT2 0014 .. 
HYPMHSIZ .... 01 
HYPMLEN .... 18 


HYPMNEXT 0018 
HYPMSIZE 0000 
HYPTAB 0008 
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IHADECB: DATA EVENT CONTROL BLOCK 

IHADECB/ which is invoked via the CMSCB macro, is the simulated data event control 
block used for CMS processing of OS macros and OS access methods. The IOBECBPT 
field in FCBSECT points to IHADECB. 


0 

DECSDECB 

DECTYPE | DECLNGTH 

8 

DECDCBAD 

DECAREA 

10 

DECIOBPT 

DECKYADR 

18 

DECRECPT 



HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

DECSDECB 

4 

EVENT CONTROL BLOCK 

4 

DECTYPE 

2 

TYPE OF I/O REQUEST 


Values Defined in DECTYPE 


80 

DECBRD 


READ SF 

20 

DECBWR 


WRITE SF 

6 

DECLNGTH 

2 

LENGTH OF KEY & DATA 

8 

DECDCBAD 

4 

VC DATA CONTROL BLOCK) 

C 

DECAREA 

4 

VC KEY 8 DATA, BUFFER) 

10 

DECIOBPT 

4 

VCIOB) 

BDAM 

EXTENSION 



14 

DECKYADR 

4 

VCKEY) 

18 

DECRECPT 

4 

VCBLOCK REFERENCE FIELD) 

SOME 

FREQUENTLY 

USED 

EQUATES 


CO 

UND 

RECFM 

= 

UNDEFINED FORMAT RECORDS 

80 

PREVIOUS 

OFLGS 

= 

PREVIOUS I/O OPERATION 

80 

IS 

DSORG 

= 

INDEXED SEQUENTIAL 

80 

FXD 

RECFM 

s 

FIXED LENGTH RECORDS 

40 

VAR 

RECFM 

= 

VARIABLE LENGTH RECORDS 

40 

QS 

MACRF 

= 

QSAM 

40 

PS 

DSORG 

= 

PHYSICAL SEQUENTIAL 

20 

DA 

DSORG 

= 

DIRECT ACCESS 

20 

BS 

MACRF 

= 

BSAM 

20 

DDNAM 

FILETYPE = DATA SET NAME 

10 

MOV 

MACRF 

= 

MOVE MODE 

10 

BLK 

RECFM 

= 

BLOCKED RECORDS 

08 

LOC 

MACRF 

= 

LOCATE MODE 

03 

POU 

DSORG 

= 

PARTI0NED UNMOVEABLE 

02 

PO 

DSORG 

= 

PARTIONED ORGANIZATION 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


BLK 

0000 

10 

DECDCBAD 

0008 .. 

DECTYPE 

0004 

# # 

POU 

0000 

03 

BS 

0000 

20 

DECIOBPT 

0010 .. 

FXD 

0000 

80 

PREVIOUS 

0000 

80 

DA 

0000 

20 

DECKYADR 

0014 .. 

IS 

0000 

80 

PS 

0000 

40 

DDNAM 

0000 

20 

DECLNGTH 

0006 .. 

LOC 

0000 

08 

QS 

0000 

40 

DECAREA 

oooc 

# # 

DECRECPT 

0018 .. 

MOV 

0000 

10 

UND 

0000 

CO 

DECBRD 

0004 

80 

DECSDECB 

0000 .. 

PO 

0000 

02 

VAR 

0000 

40 


DECBHR 0004 20 
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IJJHCPLs COMMON VTOC HANDLER PARAMETER LIST 

IJJHCPL describes the fields within the common VTOC handler input parameter list and 
is used in the CMS/DOS environment. IJJHCPL is invoked by the IJJHCPL macro. 


C*1 

CX2 CX3 /// 

CVHDLIST 

CVHVOLID 

CVHSYSNO 

CVHWRKA 

CVHRETA 


SIZE 


IJJHCPL LENGTH 

IN BYTES 

(CPLLEN) 18 

HEX 




DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

CVHFLAGS 

0 

PROCESSING INDICATORS 

0 

CVHFLG1 

1 CXI 



Values Defined in CVHFLG1 

80 CVHOPEN 
40 CVHCLOSE 
20 CVHRF4 
10 CVHRF1 
08 CVHRADR 
04 CVHRNEXT 
02 CVHRV0L1 

1 CVHFLG2 1 C*2 


OPEN VTOC 
CLOSE VTOC 
READ F4 LABEL 
READ FI LABEL 
READ BY ADDRESS 
READ NEXT 
READ V0L1 LABEL 


Values Defined in CVHFLG2 


80 CVHWADR 
40 CVHWANY 
20 CVHCOV 
10 CVHSCR 
08 CVHREN 
04 CVHCOVBP 
02 CVHSCRBP 
01 CVHPRTBP 


WRITE BY ADDRESS 
WRITE IN ANY SLOT 
CHECK FOR OVERLAPS 
SCRATCH LABEL 
RENAME LABEL 
BYPASS COV ON WRITE 
BYPASS SCRATCH ON COV 
SCR/REN EVEN IF PROTECTED 


2 CVHFLG3 1 C*3 


Values Defined in CVHFLG3 


80 CVHSHROP 
40 CVHIRIOE 


SHARE OPTION 

IRRECOVERABLE I/O ERROR OPTION 


3 


RESERVED 


4 CVHWORK 


WORK AREA 


4 CVHDLIST 4 


ADDRESS OF DLIST 
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IJJHCPL 


SP 

NAME 

LEN KEY 

DESCRIPTION 

8 

CVHIOA 

4 

ADDRESS 

OF 

I/O AREA 

8 

CVHVOLID 

4 

ADDRESS 

OF 

VOLID (OPEN) 

C 

CVHW0RK2 


WORKAREA 


C 

CVHNAME 

4 

ADDRESS 

OF 

LABEL NAME 

C 

CVHSYSNO 

4 

ADDRESS 

OF 

SYSNO (OPEN) 

10 

CVHNEW 

4 

ADDRESS 

OF 

NEW NAME 

10 

CVHWRKA 

4 

ADDRESS 

OF 

WORKAREA (OPEN) 

14 

CVHRETA 

4 

ADDRESS 

OF 

RETURN AREA 


CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CPLLEN 0000 18 
CVHCLOSE 0000 40 
CVHCOV 0001 20 
CVHCOVBP 0001 04 
CVHDL1ST 0004 . . 
CVHFLAGS 0000 .. 
CVHFLG1 0000 .. 
CVHFLG2 0001 .. 


CVHFLG3 0002 .. 
CVHIOA 0008 .. 
CVHIRIOE 0002 40 
CVHNAME 000C .. 
CVHNEW 0010 .. 
CVHOPEN 0000 80 
CVHPRTBP 0001 01 
CVHRADR 0000 08 


CVHREN 0001 08 
CVHRETA 0014 .. 
CVHRF1 0000 10 
CVHRF4 0000 20 
CVHRNEXT 0000 04 
CVHRVOL1 0000 02 
CVHSCR 0001 10 
CVHSCRBP 0001 02 


CVHSHROP 0002 80 
CVHSYSNO 000C .. 
CVHVOLID 0008 .. 
CVHWADR 0001 80 
CVHWANY 0001 40 
CVHWORK 0004 .. 
CVHN0RK2 000C .. 
CVHWRKA 0010 .. 
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IJJHDLST: VOLUME DESCRIPTOR LIST 

IJJHDLST describes the fields within the common VTOC handler descriptor list and is 
used in the CMS/DOS environment. IJJHDLST is invoked by the IJJHDLST macro. 

0 
8 

10 
18 
20 
28 

SIZE 

IJJHDLST LENGTH IN DOUBLEHQRDS (DLSTDHDS) 06 
IJJHDLST LENGTH IN BYTES (DLLEN) 30 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 DLFLAGS 1 D*1 PROCESSING FLAGS 

Values Defined in DLFLAGS 

80 DLSHROPT SHARE OPTION EXCLUSIVE 

40 DLDEVFBA FBA DEVICE 

20 DLDLGOT DLIST GETVISED BY CVH 

10 DLHAGOT HORKAREA GETVISED BY CVH 

08 DLOPENED VTOC HAS OPENED 

04 DLF4D0NE F4 BITS PROCESSED 

02 DLIRIOER ACCEPT IRRECOVERABLE I/O ERROR 

1 1 RESERVED 

2 DLVOLID 6 VOLUME SERIAL NUMBER 

8 DLSYSNO 2 SYSTEM LOGICAL UNIT NUMBER 

8 DLSYSN01 1 D*2 FIRST BYTE OF SYS-NUMBER 

9 DLSYSN02 1 D*3 SECOND BYTE OF SYS-NUMBER 

A 1 RESERVED 


B 

DLVSTART 

5 

VTOC START ADDRESS (CKD) 


B 

DLBLKCI 

1 D*4 

BLOCKS PER Cl (FBA) 


C 

DLVSTRTB 

4 

PBN OF VTOC START (FBA) 


10 

DLVEND 

4 

VTOC END ADDRESS 


14 

DLNRKA 

4 

WORKAREA ADDRESS 

f 

18 

DLDEVCAP 

4 

DEVICE CAPACITY 

V 
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IJJHDLST 


3£ 

NAME 

LEN KEY 

1C 

DLVCISZ 

4 

20 

DLCVHADR 

4 

24 

DLBTRK 

4 

28 

DLCIAREA 

4 


DESCRIPTION 

VTOC Cl SIZE (FBA) 

ADDRESS OF CVH TOP MODULE 
BLOCKS PER TRACK FOR FBA 
ADDRESS OF FBA Cl AREA 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DLBLKCI 000B . . 
DLBTRK 0024 . . 
DLCIAREA 0028 .. 
DLCVHADR 0020 . . 
DLDEVCAP 0018 .. 
DLDEVFBA 0000 40 


DLDLG0T 0000 20 
DLFLAGS 0000 .. 
DLF4D0NE 0000 04 
DLIRI0ER 0000 02 
DLLEN .... 30 
DLOPENED 0000 08 


DLSHR0PT 0000 80 
DLSTDWDS .... 06 
DLSYSNO 0008 .. 
DLSYSN01 0008 . . 
DLSYSN02 0009 . . 
DLVCISZ 001C . . 


DLVEND 0010 .. 
DLVOLID 0002 .. 
DLVSTART 000B .. 
DLVSTRTB 000C .. 
DLHAGOT 0000 10 
DLWRKA 0014 .. 
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IJJHFMT1: FORMAT 1 LABEL 

IJJHFMT1 describes the fields within the Format 1 VTOC label and is used in the 
CMS/DOS environment. IJJHFMT1 is invoked by the IJJHFMT1 macro. 


0 

28 

30 

38 

48 

50 

58 

60 

68 

70 

78 

80 

88 


F1DSN 



F1ID 

F1SER 

F1SER (cont.) 

F1VSEQ 

F1CRDTE 

F1EXPDT 

1*1 

F1D7 

| F1D8 



F1SYSC0D 



F1D10 

F1CISIZE 

Ccont.) 

F1FTYPE |F1D12 

F10PT 

F1BLK 

F1RECL 

1X2 

| F1RKP 

F1DSI 

1*3 

1X4 

1^4 (cont.) 

F1LPR 

//// 

/// | 1*5 

1X6 

F1START 

FIEND 

FIEND 



J 1*7 

F1PNT [ 


SIZE 

IJJHFMT1 LENGTH IN DOUBLEWORDS (F1DWDS) 12 
IJJHFMT1 LENGTH IN BYTES (F1LEN) 90 


HEX 

OISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

F1DSN 

44 


FILE ID 

2C 

F1ID 

1 


FORMAT1 ID - X'Fl* 

2D 

F1SER 

6 


FILE SERIAL NUMBER 

33 

F1VSEQ 

2 


VOLUME SEQUENCE NUMBER 

35 

F1CRDTE 

3 


FILE CREATION DATE (YDD) 

38 

F1EXPDT 

3 


FILE EXPIRATION DATE (YDD) 

3B 

F1EXCNT 

1 

1X1 

NUM EXTENTS FOR FILE ON VOLUME 

3C 

F1D7 

1 


UNUSED BY DOS/VS (X f 40 f ) 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

3D 

F1D8 

1 


RESERVED (X'40') 

3E 

F1SYSC0D 

13 


DOS/370 VER 4 

4B 

F1D10 

3 


RESERVED (X f 40') 

4E 

F1CISIZE 

4 


CONTROL INTERVAL SIZE (FBA) 

52 

F1FTYPE 

2 


TYPE OF FILE ORGANIZATION 

54 

F1D12 

1 


UNUSED BY DOS/VS CX'OO 1 ) 

55 

F10PT 

1 


ISAM OPTION CODES 

56 

F1BLK 

2 


ISAM BLOCK LENGTH 

58 

F1RECL 

2 


ISAM LRECL 

5A 

F1KEYL 

1 

1*2 

ISAM KEY LENGTH 

5B 

F1RKP 

2 


ISAM KEY POSITION 

5D 

F1DSI 

1 


DATA SET INDICATORS 

Values Defined in F1DSI 

80 

F1LVOL 



LAST VOL IND 

20 

F1BL8 



BLOCK MUL 8 COS/VS) 

10 

F1SEC 



PASSWORD PROTECTION 

04 

F1WPW 



WRITE PASSWORD ONLY 

5E 

F1SECAL 

4 


UNUSED BY DOS/VS CX'40 f ) 

5E 

F1SEC0PT 

1 

1X3 

SECONDARY ALLOCATION OPTION 

5F 

F1SECALL 

3 

1X4 

SECONDARY ALLOCATION VALUE 

62 

F1LRP 

5 


UNUSED BY DOS/VS (X^O 1 ) 

67 

FID21 

2 


RESERVED (X'40 f ) 

69 

F1EXTS 



EXTENTS 

69 

F1EXTYP 

1 

1X5 

EXTENT TYPE 

6A 

F1EXSEQ 

1 

1X6 

EXTENT SEQUENCE NUMBER 

6B 

F1START 

4 


LOWER CCHH 

6F 

FIEND 

4 

1X7 

UPPER CCHH 

73 


20 


ADDITIONAL EXTENTS 

87 

F1P0INT 

5 


FORMAT 3 OR 2 POINTER 

87 

F1HI0RD 

1 


ZERO FOR FBA 

88 

F1PNT 

4 


RELATIVE RECORD NUMBER FOR FBA 


( 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


F1BLK 

0056 

, # 

F1D7 

003C .. 

F1ID 

002C 

# # 

F1SEC 

005D 

10 

F1BL8 

005D 

20 

F1D8 

003D .. 

F1KEYL 

005A 

• • 

F1SECAL 

005E 


F1CISIZE 

004E 

, , 

FIEND 

006F .. 

F1LEN 

• • • • 

90 

F1SECALL 

005F 


F1CRDTE 

0035 


F1EXCNT 

003B .. 

F1LRP 

0062 

, , 

F1SEC0PT 

005E 


F1DSI 

005D 

, , 

F1EXPDT 

0038 .. 

F1LV0L 

005D 

80 

F1SER 

002D 


F1DSN 

0000 

, . 

F1EXSEQ 

006A .. 

F10PT 

0055 

# , 

F1START 

006B 


F1DWDS 

• • • • 

12 

F1EXTS 

0069 .. 

F1PNT 

0088 

, , 

F1SYSC0D 

003E 


F1D10 

004B 


F1EXTYP 

0069 

F1P0INT 

0087 

, , 

F1VSEQ 

0033 


F1D12 

0054 

# 0 

F1FTYPE 

0052 .. 

F1RECL 

0058 

, , 

F1WPW 

005D 

04 

F1D21 

0067 


F1HI0RD 

0087 . . 

F1RKP 

005B 

• • 
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IMMBLOK 


( 

IMMBLOK: IMMEDIATE COMMAND SUPPORT 

This block is created whenever an immediate command is established; it contains 
information about the immediate command. IMMBLOK is invoked by the IMMBLOK macro. 


IMMNEXT 

IMMUWORD 

| IMMNAME | 

I 1*1 | ///////////// 

IMMADDR 


18 _ IMMHIDE _| 

f 

I 

SIZE 

SIZE IN BYTES CIMMBYTES) 20 

SIZE IN DOUBLEWORDS CIMMDWDS ) 04 

IMMNEXT DISP INTO IMMBLOK (IMMNEXTD) 00 

HEX 

DISP NAME LEN KEY DESCRIPTION 

I 0 IMMNEXT 4 POINTER TO NEXT IMMBLOK 

Values Defined in IMMNEXT 

04 IMMNEXTL LENGTH OF IMMNEXT FIELD 

4 IMMUWORD 4 USER WORD 

8 IMMNAME 8 IMMEDIATE COMMAND NAME 

10 IMMFLAG1 1 1X1 FLAGS 

I Values Defined in IMMFLAG1 

t 80 IMMSYS IMMEDIATE COMMAND IS A NUCLEUS EXTENSION WITH 

SYSTEM ATTRIBUTE 

40 IMMCOUNT IMMEDIATE COMMAND ESTABLISHED VIA IMMCMD COMMAND 

20 IMMNUCX IMMEDIATE COMMAND IS A NUCLEUS EXTENSION 

11 IMMFLAG2 3 RESERVED 

14 IMMADDR 4 ADDRESS OF EXIT ROUTINE 

18 IMMHIDE 4 NUMBER OF NUCLEUS EXTENSIONS THAT ARE HIDING 

THIS IMMEDIATE COMMAND 


( 
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CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


IMMADDR 0014 .. IMMFLAG1 0010 .. 
IMMBYTES 0000 20 IMMFLAG2 0011 .. 
IMMCOUNT 0010 40 IMMHIDE 0018 .. 
IMMDWDS 0000 04 IMMNAME 0008 .. 


IMMNEXT 0000 . . 
IMMNEXTD 0000 00 
IMMNEXTL 0000 04 


IMMNUCX 0010 20 
IMMSYS 0010 80 
IMMUNORD 0004 .. 
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IMWKSECT: IMMEDIATE COMMAND WORKAREA 

This macro contains information about the CMS immediate commands and is invoked by 
the IMWKSECT macro. 


0 

8 


108 

110 

128 

130 

340 


440 

488 

4E8 

4F0 


IMWKANCH 
IMWKCMD (cont.) 


IMWKCMD 


IMWKBUF 


j 


IMWKEXTP 


j 


IMWKT0KP 


j' 


IMWKTRTB 


IMWKNUCX 


1*1 


i 


i 


IMWKHIDE 



r 



IMWKRGSV 


i_ 

IMWKSCR 

__J 


SIZE 

SIZE OF BLOCK IN DOUBLEWORDS CIMWKDWDS) 09E 
SIZE OF BLOCK IN BYTES (IMWKBYTS) 4F8 


HEX 

DISP NAME LEN KEY DESCRIPTION 


Q IMWKANCH 4 

4 IMWKCMD 8 

| C IMWKBUF 256 

| 10C IMWKEXTP 32 


POINTER TO IMMBL0K ANCHOR 
CURRENT IMMEDIATE COMMAND 

COPY OF INPUT LINE AS ENTERED FROM TERMINAL 
SAVED COPY OF LAST REGULAR COMMAND EXTENDED PLIST 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

12C 

IMNKTOKP 

536 

SAVED COPY OF LAST REGULAR COMMAND TOKENIZED PLIST 

344 

IMNKTRTB 

256 

TRANSLATE TABLE TO DETERMINE LINE LENGTH 

444 

IMNKRGSV 

64 

DMSCIT REGISTER SAVE AREA 


IMNKRG10 


LOCATION OF REGISTER 10 IN SAVEAREA 

488 

IMNKSCR 

96 

IMMEDIATE COMMAND EXIT SAVE AREA 

4E8 

IMNKNUCX 

4 

NUMBER OF IMMEDIATE COMMANDS THAT ARE ALSO NUCLEUS 
EXTENSIONS 

4 EC 

IMNKHIDE 

4 

TOTAL NUMBER OF NUCLEUS EXTENSIONS THAT ARE 
CURRENTLY HIDING IMMEDIATE COMMANDS 

4F0 

IMNKFLGS 

1 

FLAGS 


Values Defined in IMWKFLGS 

80 IMCMDACT IMMEDIATE COMMAND IS ACTIVE 

40 IMNKGOT TEMPORARY SNITCH USED BY DMSITS TO DETERMINE IF IT 

GOT THE NORKAREA 

4F8 IMNKEND 0 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


IMCMDACT 0478 80 IMNKDWDS 0000 90 
IMNKANCH 0000 .. IMNKEND 04F8 .. 
IMNKBUF 000C .. IMNKEXTP 010C .. 
IMNKBYTS 0000 80 IMNKFLGS 04F0 .. 
IMNKCMD 0004 .. 


IMNKGOT 0478 40 
IMNKHIDE 04EC .. 
IMNKNUCX 04E8 . . 
IMNKRGSV 0444 . . 


IMNKRG10 .... 
IMNKSCR 0488 
IMNKTOKP 012C 
IMNKTRTB 0344 
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IOSECT 


IOSECT: I/O INTERRUPT SAVE AREA 


IOSECT describes the fields used by DMSITI for save registers, I/O old PSW, and 
other data when handling I/O interrupts. IOSECT is pointed to by the AIOSECT field 
in NUCON. IOSECT is invoked by the IOSECT macro. 


IOSAVE 


40 

48 

50 


IONTABL 


AUSRITBL 

AUSRILST 


OLDEST 


60 


NEXTO 


70 

78 

80 

88 

90 

DO 


HOLD 

IOSBASE 


IOPSW 

IOCSW 

T VSTRANGE J ///////// 


I0SAVE2 



HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

IOSAVE 

64 

REGISTER SAVE AREA 

40 

IONTABL 

4 

SIZE OF USER INTERRUPT TABLE (DOUBLEWORDS) 

44 

AUSRITBL 

4 

ADDRESS OF USER INTERRUPT TABLE 

48 


4 

LENGTH OF EACH ENTRY 

4C 

AUSRILST 

4 

ADDRESS OF LAST ENTRY IN TABLE 

50 

OLDEST 

16 

OLDEST 1/0 OLD PSW AND CSH 

60 

NEXTO 

16 

NEXT OLDEST I/O OLD PSH AND CSW 

70 

IOPSN 

8 

NEWEST 1/0 OLD PSW 

78 

IOCSN 

8 

NEWEST CSW 

80 

HOLD 

4 

HOLDS ENTRY POINTER FOR DEVICE 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

84 

VSTRAN6E 

2 

UNKNOWN DEVICE ADDRESS SAVED HERE 

86 


2 

RESERVED FOR FUTURE USE 

88 

IOSBASE 

4 

SAVE DSMITI'S BASE REGISTER 

8C 

IOSAVE* 

72 

SAVE AREA USED BY ROUTINES CALLED 

CROSS 

REFERENCE (Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AUSRILST 

004C .. 

IOCSW 

0078 .. 

IOSAVE 

0000 .. 

NEXTO 

0060 

AUSRITBL 

0044 .. 

I0NTABL 

0040 .. 

1 I0SAVE2 

008C . . 

OLDEST 

0050 

HOLD 

0080 .. 

IOPSW 

0070 .. 

1 IOSBASE 

0088 .. 

VSTRANGE 

0084 
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IUCVIDBK 


IUCVIDBK: IUCV PROGRAM IDENTIFICATION BLOCK 

This block is created each time a program identifies itself as an IUCV program to 
CMS via the HNDIUCV SET function. IUCVIDBK is invoked by the IUCVIDBU MACRO. 


IUCVIDNX 

IUCVIDEX 

IUCVIDUW 

IUCVIDID 

IUCVIDID Ccont.) 

/////////////////// 


SIZE 

SIZE OF AREA IN DOUBLEWORDS CIUCVIDSZ) 03 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 IUCVIDNX 4 

4 IUCVIDEX 4 

8 IUCVIDUW 4 

C IUCVIDID 8 

14 4 


POINTER TO NEXT ENTRY 
ADDRESS OF THE EXIT 
ADDRESS OF THE USER FULLWORD 
IDENTITY OF THE PROGRAM 
RESERVED 


CROSS REFERENCE CName Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

IUCVIDEX 0004 .. IUCVIDNX 0000 .. IUCVIDSZ 0000 03 
IUCVIDID 000C .. IUCVIDUW 0008 .. 
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IUCVPTBK: IUCV PATH TABLE BLOCK 

This block maps an entry in the internal CMS IUCV path table. There is one entry 
for each IUCV path in the virtual machine. IUCVPTBK is invoked by the IUCVPTBK 
macro. 

0 
8 

SIZE 

SIZE OF AREA IN DOUBLEWORDS (IUCVPTSZ) 02 
HEX 

DISP NAME LEN KEY DESCRIPTION 

0 IUCVPTEX 4 ADDRESS OF THE PROGRAM EXIT 

4 IUCVPTUW 4 ADDRESS OF THE USER FULLWORD 

8 IUCVPTID 8 ID OF PROGRAM WHO OWN 1 S THIS PATH 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

IUCVPTEX 0000 .. IUCVPTSZ 0000 02 

IUCVPTID 0008 .. IUCVPTUW 0004 .. 



160 CMS Data Areas and Control Block Logic 


LY24-5221 (c) Copyright IBM Corp. 1986 




Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


IUCVTAB 


IUCVTAB: IUCV TABLE 

This block is the main IUCV control block; it contains information about the virtual 
machine's IUCV environment. IUCVTAB is invoked by the IUCVTAB macro. 


0 
8 

10 
18 

SIZE 

SIZE OF IUCVTAB IN DOUBLEWORDS (IUCVSIZE) 04 


IUCVPTAN 

IUCVSAVE 

IUCVPLST 

IUCVEXBF 

IUCVCTBF 

IUCVBKSZ 

IUCVIDAN 

IUCVCONN | 1*1 [ 1*2 


HEX 

DISP NAME LEN KEY DESCRIPTION 



0 

IUCVPTAN 

4 


ANCHOR OF PATH TABLE CHAIN 


4 

IUCVSAVE 

4 


POINTER TO A 23 BYTE SAVE AREA 


8 

IUCVPLST 

4 


POINTER TO A PLIST FOR IUCV 


C 

IUCVEXBF 

4 


POINTER TO EXTERNAL INTERRUPT BUFFER 

1 

10 

IUCVCTBF 

4 


POINTER TO CONTROL EIB 


14 

IUCVBKSZ 

4 


SIZE OF THE 4 PREVIOUS AREAS IN DOUBLEWORDS 


18 

IUCVIDAN 

4 


ANCHOR OF PROGRAM IDENTITY CHAIN 


1C 

IUCVCONN 

2 


MAXIMUM NUMBER OF IUCV CONNECTS 

1 

IE 

IUCVSETF 

1 

i*i 

INDICATES IF CMS'S SET WORKED 

1 

IF 

IUCVACTV 

1 

1*2 

INDICATES IF USERS OTHER THAN CMS HAVE 


DONE HNDIUCV SETS 


CROSS REFERENCE CName Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


| IUCVACTV 001F 
IUCVBKSZ 0014 
IUCVCONN 001C 


| IUCVCTBF 0010.. 
IUCVEXBF 000C .. 
IUCVIDAN 0018 .. 


IUCVPLST 0008 .. 
IUCVPTAN 0000 . . 
IUCVSAVE 0004 .. 


IUCVSETF 001E .. 
IUCVSIZE .... 04 
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KEYSECT: DISK KEY TABLE DSECT FOR EDAM SIMULATION 

KEYSECT defines by key, the key table used for I/O in OS simulation of BDAM files. 
KEYSECT is built dynamically from CMS free storage. KEYSECT is invoked via the 
KEYSECT macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 


KEYLNGTH 

DATAEND 

KEYOP 

KEYNAME 

KEYTYPE 

KEYMODE | ///////// 

KEYTBLAD 

TBLLNGTH 

K*1 | K*2 | ///////// 


KEYTBLNO 

KEYCOUT 

KEYTABLE 

KEYXTNTl | KEYMARK 

KEYPTRl | ///////// 

KEYXTNT2 

KEYPTR2 


HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

KEYLNGTH 

4 


KEY LENGTH 

4 

DATAEND 

4 


ITEM POINTER TO LAST DATA ITEM 

8 

KEYOP 

8 


START OF PLIST FOR KEYS FILE 

10 

KEYNAME 

8 


NAME OF KEYS FILE 

18 

KEYTYPE 

8 


FILE TYPE OF KEYS FILE 

20 

KEYMODE 

2 


FILE MODE OF KEYS FILE 

22 


2 


RESERVED 

24 

KEYTBLAD 

4 


ADDRESS OF KEY TABLE 

28 

TBLLNGTH 

4 


BYTE SIZE OF KEY TABLE 

2C 

KEYFORM 

1 

K*1 

FORMAT OF KEYS FILE 

2D 

KEYCHNG 

1 

K*2 

RDBUF/WRBUF PLIST FLAG 


Values Defined in KEYCHNG 


20 KEYEXTPL 
01 KEYCHANG 

2E 2 


EXTENDED PLIST FLAG 
INDICATES CHANGE IN KEY TABLE 

RESERVED 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

30 


4 

NUMBER OF BYTES READ 

34 

KEYTBLNO 

4 

ITEM NUMBER OF KEY TABLE 

38 

KEYCOUT 

4 

BLOCKING FACTOR OF KEY TABLE 

3C 

KEYTABLE 

4 

START OF TABLE (ITEM) FULL OF KEYS 

3C 

KEYEOF 

4 

EOF MARKER 

40 

KEYXTNT1 

2 

XTENT AREA IF < 65535 

42 

KEYMARK 

2 

BDAM KEY INDICATOR 

44 

KEYPTR1 

2 

POINTER TO KEYS IF < 65535 

46 


2 

RESERVED 

48 

KEYXTNT2 

4 

XTENT AREA IF > 65535 

4C 

KEYPTR2 

4 

POINTER TO KEYS IF > 65535 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


DATAEND 0004 .. 
KEYCHANG 002D 01 
KEYCHNG 002D .. 
KEYCOUT 0038 .. 
KEYEOF 003C .. 
KEYEXTPL 002D 20 


KEYFORM 002C 
KEYLNGTH 0000 
KEYMARK 0042 
KEYMODE 0020 
KEYNAME 0010 


KEYOP 0008 . 
KEYPTR1 0044 . 
KEYPTR2 004C . 
KEYTABLE 003C . 
KEYTBLAD 0024 . 


KEYTBLNO 0034 
KEYTYPE 0018 
KEYXTNT1 0040 
KEYXTNT2 0048 
TBLLNGTH 0028 


. 1986 


KEYSECT 
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LABREC: DLBL/EXTENT LABEL 

LABREC describes the fields within a DLBL/extent record and is used in the CMS/DOS 
environment. LABREC is invoked via the LABREC macro. 


0 

L*1 

1 LABFNAME | 

8 

L*2 

r 









LABDSN 

[ 

30 





| L*3 

LABFSER 

38 

[ LABFSER 

(cont.) 


LABVSEQ 

LABCRDTE 

1__ 

40 

| Ccont)| LABEXPDT 

LABRETPD 

L*4 | L*5 

48 

L*5 (continued) 

L*6 

50 

| LABBUFSP 

| LABVOL | 

58 

(cont.) 

LX7 | 

LX8 

LCC 

LHH 

60 

UCC 

UHH 

LABLUBA 

L*9 | /// 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

LABEXN 


NUMBER EXTENTS 

0 

LABIND 

1 L*1 

DLBL/EXTENT INDICATOR 

Values Defined in LABIND 

80 

LABNPAK 


NEXT EXTENT ON NEW PACK 

40 

LABLAST 


LAST EXTENT 

20 

LABYPAS 


BYPASS EXTENT 

10 

LABNVOL 


NEW VOL ON SAME UNIT 

08 

LABOMIT 


EXTENT LIMITS OMITTED 

04 

LABCONV 


EXTENT CONVERTED TO DASD ADDRESS 

02 

LABNO 


NO EXTENT CARD 

01 

LABSEC 


SECURED FILE 

1 

LABFNAME 

7 

FILENAME 

8 

LABDAISS 

1 LX2 

DA/IS INDICATORS 

Values Defined in LABDAISS 

80 

LABADREC 


ADDRESS LABEL RECORD FOLLOW 

40 

LABCISSW 


CI-SIZE IS SPECIFIED 

20 

LABBLKSW 


BLKSIZE IS SPECIFIED 

10 

LABFBAIN 


FBA INDICATOR 

08 

LABOMT 


EXTENT LIMITS OMITTED 

04 

LABCON 


EXT CONVERTED TO DASD ADDRESS 

02 

LABCTREC 


LABEL CONT. RECORD 


LY24-5221 (c) Copyright IBM Corp. 1986 

164 CMS Data Areas and Control Block Logic 













Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


LABREC 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

9 

LABDSN 

44 


DATA SET NAME 

35 

LABFID 

1 

LX3 

FORMAT ID 

36 

LABFSER 

6 


VOLID OF FIRST EXTENT 

3C 

LABVSEQ 

2 


VOLUME SEQUENTIAL NUMBER 

3E 

LABCRDTE 

3 


CREATION DATE 

41 

LABEXPDT 

3 


EXPIRATION DATE 

44 

LABRETPD 

2 


RETENTION PERIOD 

46 

LABOPCOD 

1 

L*4 

DLBL TYPE 

47 

LABSYSCD 



SYSTEM CODE 

47 

LABVSAM 



VSAM OHNED FLD 

47 

LABUCNAM 

7 

L*5 

USER CATALOG NAME 

4E 


2 

LX6 


4C 

LABCISZ 

4 


CI-SIZE 

50 

LABBUFSP 

4 


BUFFER SIZE 

54 

LABEXT 




54 

LABVOL 

6 


VOLID 

5A 

LABTYP 

1 

LX7 

TYPE OF EXTENT 

5B 

LABSEQ 

1 

L*8 

EXTENT NUMBER 

5C 

LABST 



START OF EXTENT 

5C 

LABSTBK 




5C 

LCC 

2 


LOWER CYL 

5E 

LHH 

2 


LOWER HEAD 

60 

LABED 



EXTENT END 

60 

LABENDBK 




60 

UCC 

2 


UPPER CYL 

62 

UHH 

2 


UPPER HEAD 

64 

LABLUBA 

2 


LUB UNIT 

66 

LABSH 

1 

LX9 

SWITCHES 


Values Defined in LABSH 

80 LAB64K BLOCK ADDRESS AND/OR NUMBER OF BLOCKS 64K-1 

67 1 RESERVED 
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CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


LABADREC 

0008 

80 

LABED 

0060 


LABNO 

0000 

02 

1ABSYSCD 

0047 


LABBLKSW 

0008 

20 

LABENDBK 

0060 


LABNPAK 

0000 

80 

LABTYP 

005A 


LABBLKSZ 

0050 

# * 

LABEXN 

0000 


LABNVOL 

0000 

10 

LABUCNAM 

0047 


LABBUFSP 

0050 

# # 

LABEXPDT 

0041 


LABOMIT 

0000 

08 

LABVOL 

0054 


LABCISSW 

0008 

40 

LABEXT 

0054 


LABOMT 

0008 

08 

LABVSAM 

0047 


LABCISZ 

004C 

# # 

LABFBAIN 

0008 

io 

LA30PC0D 

0046 

# # 

LABVSEQ 

003C 


LABCON 

0008 

04 

LABFID 

0035 


LABRETPD 

0044 

# # 

LABYPAS 

0000 

20 

LABCONV 

0000 

04 

LABFNAME 

0001 


LABSEC 

0000 

01 

LAB64K 

0066 

80 

LABCRDTE 

003E 

, . 

LABFSER 

0036 


LABSEQ 

005B 

, , 

ICC 

005C 

# # 

LABCTREC 

0008 

02 

LABIND 

0000 


LABST 

005C 

, , 

LHH 

005E 

# # 

LABDAISS 

0008 


LABLAST 

0000 

40 

LABSTBK 

005C 

# 9 

UCC 

0060 

• • 

LABDSN 

0009 

, , 

LABLUBA 

0064 

, . 

LABSW 

0066 

, . 

UHH 

0062 
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LABSECT: TAPE LABEL INFORMATION 

LABSECT contains user-supplied tape label information used by CMS tape label 
processing. LABSECT is invoked via the LABSECT macro. 


0 

8 

10 

20 

28 

30 

38 

40 

48 

50 


LABNEXT|LABFCBPT 
LABFILE 


LABFID 



| LX1 | LABV0LID 

LABVSEQ 

LABFSEQ 

LABGENN 

LABGENV j LABCRD 

LABCRD (cont.) 

LABEXD 

(cont.) | L*2 | L*3 

LACCUVOL 

LABNXV0L 

LABVSECT 

LABCSECT 

LABVOLS 


C8 

DO 

110 


SIZE 


HEX 

DISP 

NAME 

0 

LABNEXT 

4 

LABFCBPT 

8 

LABFILE 

10 

LABFID 

21 

LABSEC 

22 

LABVOLID 

28 

LABVSEQ 

2C 

LABFSEQ 


4 

4 


VOLUME SEQUENCE NUMBER 
FILE SEQUENCE NUMBER 


_J 

LABEND 

[ 

LABFILID 


j 





DOUBLEWORDS (LABSIZE) 1A 



LEN KEY 

DESCRIPTION 




4 

FORWARD CHAIN POINTER 



4 

POINTER TO FCBSECT OR 

ZERO 


8 

NAME OF FILE (DDNAME) 

FOR BLOCK 


17 

FILE ID(RIGHTMOST 17 

CHARACTERS) 


1 LX1 

SECURITY 




6 

VOLUME SERIAL NUMBER 

CVOLID) 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

30 

LABGENN 

4 

GENERATION NUMBER 

34 

LABGENV 

2 

GENERATION VERSION 

36 

LABCRD 

6 

CREATION DATE 

3C 

LABEXD 

6 

EXPIRATION DATE 

42 

LABFLAG1 

1 L*2 

DEFAULT FLAGS BYTEs 

Values Defined in LABFLAG1 

80 

LABDFID 


DEFAULT FILE ID 

40 

LABDSEC 


DEFAULT SECURITY 

20 

LABDVID 


DEFAULT VOLUME SERIAL NUMBER 

10 

LABDVSEQ 


DEFAULT VOLUME SEQUENCE NUMBER 

08 

LABDFSEQ 


DEFAULT FILE SEQUENCE NUMBER 

04 

LABDGENN 


DEFAULT GENERATION NUMBER 

02 

LABDGENV 


DEFAULT GENERATION VERSION 

01 

LABDCRD 


DEFAULT CREATION DATE 

43 

LABFLAG2 

1 L*3 

MISCELLANEOUS FLAGS BYTEs 

Values Defined in LABFLAG2 

80 

LABDEXD 


DEFAULT EXPIRATION DATE 

40 

LABSCRAT 


DO f SCRATCH f VOLID PROCESSING 

20 

LABSCRSP 


SCRATCH SPECIFIED; NOT DEFAULT 

04 

LABFDEF 


LABSECT GOTTEN BY FILEDEF 

02 

LABPERM 


PERMANENT SPECIFIED 

01 

LABNOCHG 


NOCHANGE SPECIFIED 

44 

LABCUVOL 

4 

POINTER TO CURRENT VOLID MOUNTED 

48 

LABNXVOL 

4 

POINTER TO NEXT VOLID TO MOUNT 

4C 

LABVSECT 

4 

FORWARD CHAIN POINT TO VOLSECT 

50 

LABCSECT 

4 

VOLSECT ADDR OF CURRENT VOLID 

54 

LABVOLS 

120 

SPACE FOR 15 ADDITIONAL VOLIDS 

CC 

LABEND 

4 

FENCE FOR END OF VOLIDS 

DO 

LABFILID 

44 

FILE IDENTIFIER 

CROSS 

REFERENCE 

! (Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

LABCRD 0036 .. LABDSEC 0042 40 | LABFILID OODO .. LABPERM 0043 02 
LABCSECT 0050 .. LABDVID 0042 20 LABFLAG1 0042 .. I LABSCRAT 0043 40 
LABCUVOL 0044 .. LABDVSEQ 0042 10 LABFLAG2 0043 .. | LABSCRSP 0043 20 
LABDCRD 0042 01 LABEND 00CC .. LABFSEQ 002C .. LABSEC 0021 .. 

LABDEXD 0043 80 LABEXD 003C .. LABGENN 0030 .. LABSIZE _ 1A 

LABDFID 0042 80 LABFCBPT 0004 .. LABGENV 0034 .. LABVOLID 0022 .. 
LABDFSEQ 0042 08 LABFDEF 0043 04 LABNEXT 0000 .. LABVOLS 0054 .. 
LABOGENN 0042 04 LABFID 0010 .. LABNOCHG 0043 01 LABVSECT 004C .. 
LABDGENV 0042 02 LABFILE 0008 .. LABNXVOL 0048 .. LABVSEQ 0028 .. 
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LANGBLK 


LANGELK: NATIONAL LANGUAGE SUPPORT (NLS) ~ SEJ LANGUAGE 

LANGBLK points to language information that an application uses. The LANGBLK for 
the default language is in DMSNUC. A LANGBLK is created via the set language 
command. 


LANGNEXT 

LANGAPID |FLG1 

LANGLANG 

| // | LANGDISK 

LANGMSG 

LANGSPA 

LANGUPA 

LANGSSY 

LANGUSY 

LANGTRTS 

LANGUSER 

LANGUME 


SIZE 

BYTES OF STORAGE FOR LANGBLK C LANGBLKB) 30 
DOUBLE WORDS OF STORAGE FOR LANGBLK (LANGBLKD) 6 

HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

LANGNEXT 

4 

POINTER TO NEXT LANGBLK 

4 

LANGAPID 

3 

APPLICATION ID 

7 

LANGFLG1 

1 

FLAG BYTE 

Values Defined in LANGFLG1 

80 

40 

20 

10 

08 

LANGET 

LANGUSSY 

LANGUSTR 

LANGSYSY 

LANGSYTR 


ON INDICATES DBCS LANGUAGE 

USER SYNONYMS WANTED 

USER TRANSLATIONS WANTED 

SYSTEM SYNONYMS UANTED 

SYSTEM TRANSLATIONS WANTED 

8 

LANGLANG 

5 

LANGUAGE IDENTIFIER 

D 


1 


E 

LANGDISK 

2 

HELP (OR APPLICATION) DISK ADDRESS 

10 

LANGMSG 

4 

MESSAGE REPOSITORY 

14 

LANGSPA 

4 

SYSTEM PARSER TABLE 

18 

LANGUPA 

4 

USER PARSER TABLE 

1C 

LANGSSY 

4 

SYSTEM SYNONYM AND ABBREVIATION TABLE 

20 

LANGUSY 

4 

USER SYNONYM AND ABBREVIATION TABLE 

24 

LANGTRTS 

4 

NLS TRANSLATION TABLES 

28 

LANGUSER 

4 

RESERVED FOR APPLICATIONS USE 
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DISP NAME LEN KEY DESCRIPTION 

2C LANGUME 4 USER ADDITIONS TO MESSAGE REPOSITORY 


CROSS REFERENCE CName Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

LANGFLG1 0007 .. LANGSSY 001C .. LANGUPA 0018 .. 

LANGLANG 0008 .. LANGSYSY 0007 10 LANGUSER 0028 .. 

LANGMSG 0010 .. LANGSYTR 0007 08 LANGUSSY 0007 40 

LANGNEXT 0000 .. LANGTRTS 0024 .. LANGUSTR 0007 20 

LANGSPA 0014 .. LANGUME 002C .. LANGUSY 0020 .. 


LANGAPID 0004 .. 
LANGBLKB .... 30 
LANGBLKD .... 06 
LANGDISK 000E . . 
LANGET 0007 80 
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LDRST 


LDRST: LOADER STORAGE AREA 

LDRST describes the fields of the work area used by the loader. The work area is 
obtained and built dynamically by DMSLDR from CMS free storage. LDRST is invoked 
via the LDRST macro. 


0 

GPRSAV 

8 


L0CSAV 

10 

NATSAVE 

ENGSAVE 

18 

NAMORIG | 

20 

RETT 

L0CCT 

28 

BRAD 

TBLREF 

30 

FLAGl|FLAG2|FLAG3| /// 

TBLCT | ///////// 

38 

///////////////////////////////////////////// [ 

40 

RLDC0NST 

PARMLIST 

48 

RETREG 


50 




88 


TEMPST 

90 

TMPL0C 

CRDPTR 

98 

FILE 

A0 

READBUF 

B8 

FNAME 

B0 

FTYPE 

B8 

FMODE | CURRCSID 

RADD 

CO 

RLENG 

RFIX |REPL | ///////// 

C8 

NUMBYTE 

RITEM 

DO 

RNUM 

RWRPT 


r i 


LY24-5221 (c) Copyright IBM Corp. 1986 


CMS Data Areas and Control Block Logic 173 























LDRST 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


RRDPT 

FINIS 

FINIS 

LDRFINFN 

LDRFINFN 

LDRFINFT 

LDRFINFT 

LDRFINFM |UNUSd] L*1 

FLAGS| L*2 

LDRRLD 

TYPLIN 

TYPEAD 


D8 

EO 

E8 

FO 

F8 

100 

108 


110 1 

r 


DSKLIN 

i 

128 



_j 


DSKAD 






138 


| L*3 

L*4 

140 

L*4 (CONTINUED) 

LX5 

148 

CONT. 

[ 

HEXCON 


150 



| LX6 

158 

CONT. | LX7| 

L*8 | 



160 

[ 


OUTBUF 

= 

1B8 






ICO 

PRVCNT 

SAV67 

1C8 

SAV67 

ENTNAME 

1D0 

ENTNAME 

ENTADR 

1D8 

MEMBOUND 

PLISTSAV 

1E0 

L_ 


PLISTSAV 

1 

__1 

3E0 

REG13SAV 

FRSTSDID 

3E8 

LDRRLDAT 

LDR14A 

3F0 

LDRESIDA 

LDRESIDL 


3F8 


BF8 


C28 


PLISTSAV 


L*9 


T 


PRMESS 




LDR14A 


PRMESS2 
r-T" 
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LDRST 


C78 

C80 

CA8 

CBO 

CF8 

D00 


D30 

D38 

D60 

D68 

D98 

DAO 


DC8 


1DC8 



1 L *>> 1 

[ L*C 

: 

CMMESS 

= 

CMMESS2 

:: 

LXD | 



: 

CXDTXT 

: 

[ 

L*E | 



CXDTXT 

. 



r l * f T 

. 

PTTXT 


[ L*10| 



: 

CXDTXT 

= 

LDRESIDA 

i 


:: 

SPEC 

: 


SIZE 

ENDFREE-LDRST LENGTH IN DOUBLEWORDS (NEED) 123 
HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

GPRSAV 

12 

REGISTERS 9-12 

C 

LOCSAV 

4 

BASE REGISTER ACDMSLDRA) 

10 

NATSAV 

4 

NATIVE LANG. PLIST PTR. 

14 

ENGSAV 

4 

ENGLISH PLIST POINTER 

18 

NAMORIG 

8 

"ORIGIN" NAME VALUE 

20 

RETT 

4 

RETURN REGISTER FOR DMSLSB 

24 

LOCCT 

4 

(LOCCNT) NEXT LOAD LOCATION 
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DISP 

NAME 

28 

BRAD 

2C 

TBLREF 

30 

FLAG1 
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LEN KEY DESCRIPTION 

4 CSTRTADDR) START EXECUTION ADDRESS 

4 CALDRTBL) TOP OF LOADER TABLE 

1 LOADER SWITCHES (PERMANENT) 


Values Defined in FLAG1 


80 ABSOLUTE 
40 FSTXTADR 
20 COMMONEX 
10 PREXIST 
08 ENDCDADR 
04 NOERASE 
02 WORKFILE 
01 NODUP 


ABSOLUTE LOADING 

FIRST TEXT ADDRESS SAVED 

COMMON ENTRIES EXIST IN LOADER TABLE 

PR ENTRIES EXIST IN LOADER TABLE 

ALLOW END CARD ADDRESS 

DON’T ERASE THE LOAD MAP 

WORK FILE EXISTS 

DO NOT TYPE MSG 202W 


31 FLAG2 1 LOADER SWITCHES (PERMANENT) 


Values Defined in FLAG2 


80 STRINITC 
40 NOMAP 
20 APRILB 
10 NOAUTO 
08 TYPE 
04 NOREP 
02 NOINV 
01 NOLIBE 


CALL STRINIT ON LOADMOD 

DO NOT CREATE A LOAD MAP 

REP CARD PROCESSING CONTROL 

NO AUTOMATIC TEXT DECK CHECKING 

TYPE LOAD MAP AT TERMINAL 

NO REP CARD PRINTING 

NO INVALID CARD TYPEOUT 

NO AUTOMATIC TXT LIBRARY SEARCHING 


| 32 FLAG3 1 MORE FLAGS 


Values Defined in FLAG3 


80 

CMD 


PROCESSING NAMES FROM CMD LIST 

40 

RLDSAVE 


FOR USE IN SUBSEQUENT GENMOD COMMANDS 

20 

HISTORY 


HIST OPTION OF LOAD OR INCLUDE SPECIFIED. 
SAVE THE COMMENTS WHEN LOADING TEST FILES 

FOR SUBSEQUENT GENMOD. 

10 

HISTFULL 


THE HISTORY BUFFER IS FULL. DO NOT CONTINUE 
PROCESSING HISTORY DATA DURING THIS COMMAND. 

33 


1 

RESERVED 

34 

TBLCT 

2 

NUMBER OF ENTRIES IN LOADER TABLE 

36 


10 

RESERVED 

40 

RLDCONST 

4 

RELOCATION CONSTANT 

44 

PARMLIST 

4 

UPDATED PARAMETER LIST POINTER 

48 

RETREG 

4 

RETURN REGISTER 

4C 

APSV 

64 

REGISTER SAVE AREA FOR SUBROUTINE CALLS 

8C 

TEMPST 

4 

TEMPORARY RLD ROUTINE STORAGE 

90 

TMPLOC 

4 

TEMPORARY STORAGE 

94 

CRDPTR 

4 

INPUT CARD POINTER 

98 

FILE 

8 

SAVE LOCATION FOR DMSLIB 

AO 

LDRREAD 

0 

PARAMETER LIST FOR READING CARDS 

AO 

READBUF 

8 

INPUT READ PARAMETER LIST 

A8 

LDRFILE 

0 

FILE NAME, TYPE, AND MODE FIELDS 
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LDRST 


SP 

NAME 

LEN 

KEY 

DESCRIPTION 


A8 

FNAME 

8 


FILE NAME 


BO 

FTYPE 

8 


FILE TYPE 


B8 

FMODE 

2 


FILE MODE 


BA 

CURRCSID 

2 


CURRENT CSECT ID 


BC 

RADD 

4 


BUFFER ADDRESS 


CO 

RLENG 

4 


BUFFER LENGTH 


C4 

RFIX 

1 


FIXED/VARIABLE FLAG BYTE 


C5 

REPL 

1 


EXTENDED P-LIST FLAG 


C6 


2 


UNUSED 


C8 

NUMBYTE 

4 


NUMBER OF BYTES ACTUALLY 


CC 

RITEM 

4 


ITEM NUMBER 


DO 

RNUM 

4 


NUMBER OF ITEMS 


D4 

RNRPT 

4 


WRITE POINTERER LIST 


D8 

RRDPT 

4 


READ POINTER 


DC 

LDRFINIS 

0 


ENTIRE FINIS PARAMETER LIST 


DC 

FINIS 

8 


FINIS PARAMETER LIST 


E4 

LDRFINFN 

8 


FILENAME FOR FINIS PARAMETER 

LIST 

EC 

LDRFINFT 

8 


FILETYPE FOR FINIS PARAMETER 

LIST 

F4 

LDRFINFM 

2 


FILEMODE FOR FINIS PARAMETER 

LIST 

F6 


1 


UNUSED 


F7 

LDRFLAG4 

1 

L*1 

FLAGS(NON-PERMANENT) 



Values Defined in LDRFLAG4 


80 ESD1STN 
40 LDRCRLD 
10 LDRESIDX 
08 LDRPR 


ESD1ST NOT PREVIOUSLY ON FOR PC 
DMSLDRC RETURNS TO RLD 
ON =ESID TABLE EXTENDED 
ON =PR TYPE CALLING SRCH 


F8 FLAGS 1 L*2 LOADER SNITCHES(NON-PERMANENT) 

Values Defined in FLAGS 


80 START 
40 ONEDYNA 
20 ESD1ST 
08 SETLIB 
04 CLOSELIB 
02 LUNDEF 
01 RESET 


F9 

FC 

100 


LDRRLD 

TYPLIN 


3 

4 
8 


START EXECUTION REQUESTED 

ONE CALL TO DYNALOAD PER TEXT FILE 

FIRST ESD DATA ITEM THIS CARD 

SET UP FOR LIBRARY SEARCHING 

CLEAR TXT LIB SEARCHING 

UNDEFINED ENTRIES EXIST IN LOADER TABLE 

RESET 1 ENTRY 1 SPECIFIED 

LIBRARY SEARCH NORK AREA POINTER 

RLD DATA STACK POINTER 

TYPLIN PARAMETER LIST 
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DISP 

108 

110 

12C 

139 

13D 

145 

149 

| 157 
| 15A 
15B 
| 15C 

ICO 

1C4 

ICC 

1D4 

1D8 

1E0 

| 3E0 
| 3E4 
| 3E8 
| 3 EC 
| 3F0 
| 3F4 
| 3F8 
| BF8 
| BF9 
| C2B 
| C2C 
| C7C 
| C7D 
| CAF 
| CBO 
I DOO 
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NAME 

LEN 

KEY 

DESCRIPTION 

TYPEAD 

8 


TYPLIN BUFFER ADDRESS 

DSKLIN 

28 


DISK PARAMETER LIST FOR LOAD MAP 

DSKAD 

13 




4 

LX3 



8 

L*4 



4 

L*5 


HEXCON 

14 




3 

LX6 

PADDING 

OUTPUT 

1 

L*7 


OUTBUFL 

1 

L*8 

AL1 LENGTH OF OUTBUFL 

OUTBUF 

100 


100X OUTPUT BUFFER FOR LOAD MAP AND TERMINAL 
PRINT 

PRVCNT 

4 


ADDRESS OF NEXT PR 'LOAD ADDRESS' 

SAV67 

8 


TEMPORARY SAVE OF REGS 6 AND 7 

ENTNAME 

8 


ENTRY NAME (RESET 'ENTRY' OR ENTRY CONTROL CARD) 

ENTADR 

4 


ENTRY NAME'S LOADER TABLE LOCATION 

MEMBOUND 

4 


LOW EXTEND OF FREE STORAGE (FREELOWE) 

PLISTSAV 

256 


LOAD (INCLUDE) PARAMETER LIST SAVED 

REG13SAV 

4 


SAVE AREA FOR STARTED PROGRAM 

FRSTSDID 

4 


PLIST POINTER 

LDRRLDAT 

4 


RLD DATA FIELD 

LDR14A 

4 


R14 SAVE AREA FOR FIRST LEVEL SUBR 

LDRESIDA 

4 


ADDRESS OF ESID TABLE 

LDRESIDL 

4 


LENGTH OF ESID TABLE IN BYTES 

LDRESID 2048 


INITIAL ESID TABLE SIZE IN DWORDS 

PRMESSL 

1 

L*9 

LENGTH OF FIRST LINE 

PRMESS 

50 


FIRST LINE 

PRMESSL2 

1 

L*A 

LENGTH OF SECOND LINE 

PRMESS2 

80 


SECOND LINE 

CMMESSL 

1 

L*B 

LENGTH OF FIRST LINE 

CMMESS 

50 


FIRST LINE 

CMMESSL2 

1 

L*C 

LENGTH OF SECOND LINE 

CMMESS2 

80 


SECOND LINE 

CXDMESS 

1 

L*D 
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LDRST 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

D01 

CXDTXT 

50 



D33 

INVCRD 

1 

L*E 


D34 

INVTXT 

50 



D66 

PTERR 

1 

L*F 


D67 

PTTXT 

50 



D99 

CTLCRD 

1 

LX10 


D9A 

CTLTXT 

50 



DCC 

SPEC 

4096 


CARD INPUT BUFFER 
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LDRST 


Contains Restricted Materials of IBM 
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DISP NAME LEN KEY DESCRIPTION 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ABSOLUTE 

0030 

80 

FLAG2 

0031 

• • i 

LDR14A 

03EC 

# # 

RADD 

OOBC 


APRILB 

0031 

20 

FLAG3 

0032 


LOCCT 

0024 

# # 

READBUF 

00A0 


APSV 

004C 

, # 

FM0DE 

00B8 

# . 

LOCSAV 

OOOC 

• • 

| REG13SAV 

03E0 


BRAD 

0028 


FNAME 

00A8 

, # 

LUNDEF 

00F8 

02 

REPL 

00C5 


CLOSELIB 

00F8 

04 

FRSTSDID 

03E4 

, , 

MEMB0UND 

01D8 

# # 

RESET 

00F8 

6i 

CMD 

0032 

80 

FSTXTADR 

0030 

40 

NAMORIG 

0018 

• • 

RETREG 

0048 


CMMESS 

0C7D 


FTYPE 

00B0 


NATSAV 

0010 

* f 

RETT 

0020 


CMMESSL 

0C7C 


GPRSAV 

0004 

# m 

N0AUT0 

0031 

10 

RFIX 

00C4 


CMMESSL2 

0CAF 


HEXCON 

0149 

# m 

NODUP 

0030 

01 

RITEM 

OOCC 


CMMESS2 

0CB0 


HISTFULL 

0032 

10 

NOERASE 

0030 

04 

RLDCONST 

0040 


COMMONEX 

0030 

20 

HISTORY 

0032 

20 

NOINV 

0031 

02 

| RLDSAVE 

0040 

40 

CRDPTR 

0090 


INVCRD 

0D33 


NOLIBE 

0031 

01 

RLENG 

OOCO 


CTLCRD 

0D99 


INVTXT 

0D34 


NOMAP 

0031 

40 

RNUM 

OODO 


| CTLTXT 

0D9A 


LDRCRLD 

00F7 

87 

NOREP 

0031 

04 

RRDPT 

00D8 


CURRCSID 

00BA 


LDRESID 

03F8 


NUMBYTE 

00C8 

* # 

RWRPT 

00D4 


1 CXDMESS 

0D00 


LDRESIDA 

03F0 


ONEDYNA 

00F8 

40 

SAV67 

01C4 


CSDTXT 

0D01 


LDRESIDD 

0100 


OUTBUF 

015C 


SETLIB 

00F8 

08 

DSKAD 

012C 


LDRESIDL 

03F4 

;; i 

| OUTBUFL 

015B 


SPEC 

ODCC 

• • 

DSKLIN 

0110 


LDRESIDX 

00F7 

10 

OUTPUT 

015A 


START 

00F8 

80 

ENDCDADR 

0030 

08 

LDRFILE 

00A8 


PACK 

0149 

XX 

STRINITC 

0031 

80 

ENDFREE 

1DD0 


LDRFINFM 

00F4 


PARMLIST 

0044 


TBLCT 

0034 

• • 

| ENGSAV 

0014 


LDRFINFN 

00E4 


PLISTSAV 

01E0 


TBLREF 

002C 


ENTADR 

01D4 


LDRFINFT 

00 EC 


PREXIST 

0030 

io 

TEMPST 

008C 

• • 

ENTNAME 

01CC 


LDRFINIS 

00 DC 


PRMESS 

0BF9 


TMPLOC 

0090 

• • 

ESD1ST 

00F8 

20 

LDRFLAG4 

00F7 


PRMESSL 

0C2B 


TYPE 

0031 

08 

| ESD1STN 

00F7 

80 

LDRPR 

00F7 

08 

PRMESS2 

0C2C 


TYPEAD 

0108 

• • 

FILE 

0098 


LDRREAD 

00A0 


PRVCNT 

01C0 


TYPLIN 

0100 

* * 

FINIS 

00DC 


LDRRLD 

00FC 


1 PTERR 

0D66 

• • 

UNPACK 

014E 

XX 

FLAGS 

FLAG1 

00F8 

0030 

• • 

LDRRLDAT 

03E8 


| PTTXT 

0050 


NORKFILE 

0030 

02 
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LIBSECT 


LIBSECT? CMS PDS header 

LIBSECT keeps track of the total library size and the address of the CMS PDS 
directory. LIBSECT is invoked via the LIB macro. 


0 

LIBIDENT 

| ///////// 

8 

LIBDIRSZ | 

LIBDIR 

10 





SIZE 

PDS IDENTIFIER LENGTH IN BYTES (LIBIDSIZ) 50 


HEX 

DISP 

NAME 

LEN KEY DESCRIPTION 

0 

LIBIDENT 

6 

CMS PDS LIB IDENTIFIER 

6 


2 

RESERVED 

8 

LIBDIRSZ 

4 

TOTAL DIRECTORY SIZE IN BYTES 

C 

LIBDIR 

4 

DIRECTORY ADDRESS AS FULLWORD EXTENDED ITEM NUMBER 

10 


64 

RESERVED 

MAPPING OF SCP 

FORMAT 

HEADER ENTRY 

06 

LIBDIRX 


SCP HALFWORD DIR ITEM NUMBER 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

LIBDIR 000C .. LIBDIRX 000C 06 LIBIDENT 0000 .. 

LIBDIRSZ 0008 .. LIBIDSIZ _ 50 


. 1986 
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LOCKTAB: LOCK/UNLOCK RESOURCE TABLE 

LOCKTAB simulates the VSE LOCK/UNLOCK resource table. LOCKTAB is invoked via the 
LOCKTAB macro. 


0 

LOKBDY | 

LOKOE 




: 

(480 bytes) 

__ ] 

1E0 



ALOKTABS 

1E8 

LASTUSED 



HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

LOKBDY 

2 

ENTRY FOR LOCKTAB SPACE 

2 

4 

1E4 

LOKOE 

ALOKTABA 

ALOKTABE 

2 

ENTRY FOR OWNER ELEMENTS 

START OF LOCK TABLE (480 BYTES MAXIMUM) 

END OF LOCK TABLE (VARIABLE) 

1E4 

ALOKTABS 

4 

SIZE OF LOCK TABLE (VARIABLE) 

1E8 

LASTUSED 

4 

HIGH WATER MARK (VARIABLE) 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

ALOKTABA 0004 .. ALOKTABS 01E4 .. LASTUSED 01E8 .. LOKBDY 0000 .. 
ALOKTABE 01E4 .. LOKOE 0002 .. 
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LOGFBFMT: l og/format file entry 

LOGFBFMT describes the format of the programmable operator 
feedback file records. Maximum length for a record is 132 
PROP copy. 

SIZE 

LENGTH OF RECORD PREFIX CLGFBTDSP) 26 
HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

LGFBSTRT 

0 

START OF RECORD 

0 

LGFBDATE 

8 

DATE WRITTEN (YY/MM/DD) 

8 


1 

SPACER 

9 

LGFBTIME 

8 

TIME WRITTEN (HH:MM:SS) 

11 


1 

SPACER 

12 

LGFBUSER 

8 

USERID OF ORIGINATOR 

1A 


1 

SPACER 

IB 

LGFBNODE 

8 

NODEID OF ORIGINATOR 

23 

LGFBCOLN 

1 

DELIMITER OF TEXT 

24 


2 

SPACER 

26 

LGFBTEXT 

0 

MESSAGE TEXT 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above 
general equates that the copy file may contain. 

LGFBCOLN 0023 .. LGFBNODE 001B .. LGFBTDSP _ 26 

LGFBDATE 0000 .. LGFBSTRT 0000 .. LGFBTEXT 0026 .. 


. 1986 


LOGFBFMT 


facility log file and 
LOGFBFMT is found in 


as well as any 

LGFBTIME 0009 .. 
LGFBUSER 0012 .. 
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LPLDCT: LABEL MACRO PARAMETER LIST 

LPLDCT describes the fields within the label macro input parameter list used in the 
CMS/DOS environment. LPLDCT is invoked via the LPLDCT macro. 



HEX 

DISP NAME LEN KEY DESCRIPTION 


0 LPLAREA 4 BUFFER ADDRESS 

4 LPLBFLEN 2 LENGTH OF BUFFER 

6 LPLLBLEN 2 LENGTH OF LABEL 

8 LPLNAM FILE NAME PLUS INT. SEQUENTIAL NUMBER 

8 LPLKEY 7 FILE NAME 

F 1 RESERVED 


10 

LPLGRP 



GROUP OF LABELS 

10 

LPLPNUM 

1 

L*1 

PARTITION IDENTIFICATION 

11 


1 


RESERVED 

12 

LPLSTORE 

1 

L*2 

OPTION CODE 

13 

LPLINDIC 

1 

L*3 

LPL INDICATORS 

14 

LPLSEQNO 

1 

L*4 

EXTENT SEQUENCE NUMBER 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

LPLAREA 0000 .. LPLINDIC 0013 .. LPLNAM 0008 .. LPLSEQNO 0014 .. 

LPLBFLEN 0004 .. LPLKEY 0008 .. LPLPNUM 0010 .. LPLSTORE 0012 .. 

LPLGRP 0010 .. LPLLBLEN 0006 .. 
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LUBTAB 


LUBTAB AND LUBPR? LOGICAL UNIT BLOCK TABLE 

LUBTAB is a device table that has a 2-byte entry for each symbolic name used by 
CMS/DOS. The simulated LUB has 255 entries: 14 entries for the system logical 
units and 241 entries for programmer logical units. System devices (SYSRDR, SYSIPT, 
SYSPCH, SYSLST, and SYSLOG) can be assigned to alternate devices. The system and 
programmer tables are defined with separate DSECTs: LUBTAB and LUBPR. LUBTAB is 
pointed to by the LUBPT field in BGCOM. The address of the first LUB entry is in 
the first byte of the FICL control block. Both LUBTAB and LUBPR are invoked via the 
LUBTAB macro. 


0 

LUBRDR 

LUBIPT 

LUBPCH 

LUBLST 

8 

LUBLOG 

LUBLNK 

LUBRES 

LUBSLB 

10 

LUBRLB 

LUBUSE 

LUBREC 

LUBCLB 

18 

LUBVIS 

LUBCAT 



HEX 

DISP 

NAME 

0 

LUBRDR 

2 

LUBIPT 

4 

LUBPCH 

6 

LUBLST 

8 

LUBLOG 

A 

LUBLNK 

C 

LUBRES 

E 

LUBSLB 

10 

LUBRLB 

12 

LUBUSE 

14 

LUBREC 

16 

LUBCLB 

18 

LUBVIS 

1A 

LUBCAT 


LEN KEY DESCRIPTION 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 
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LUBTAB 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


LUBCAT 

001A .. 

LUBLOG 

0008 .. 

LUBREC 

0014 .. 

LUBSLB 

000E .. 

LUBCLB 

0016 .. 

LUBLST 

0006 .. 

LUBRES 

000C .. 

LUBUSE 

0012 .. 

LUBIPT 

0002 .. 

LUBPCH 

0004 ... 

LUBRLB 

0010 .. 

LUBVIS 

0018 .. 

LUBLNK 

000A .. 

LUBRDR 

0000 .. 






LUB000 

LUB001 

LUB002 

| LUB003 

□ 

i 

+-- 

LUB004 through LUB239 


1 

_j 


0 

8 

1E0 


LUB240 


LUB241 


SIZE 

LUB LENGTH IN BYTES (LUBL) 02 


HEX 

DISP 

NAME 

LEN 

KEY DESCRIPTION 




0 

LUB000 

2 





1E0 

LUB240 

2 





1E2 

LUB241 

LUBP 

LUBJ 

2 

DISPLACEMENT 

DISPLACEMENT 

TO 

TO 

PUB 

JIE 

FOINTER 

POINTER 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


LUBJ 01E2 01 LUBP 01E2 00 LUB000 0000 .. 
LUBL .... 02 


LUB240 01E0 .. 
LUB241 01E2 .. 
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NUCON 


NUCON: NUCLEUS CONSTANT AREA 

NUCON is the nucleus constant area of CMS. NUCON is invoked via the NUCON macro. 


0 

RSTNPSW 

RSTOPSW 

10 

ACMSCVT 

ASYSREF 

EXTOPSW 

20 

SVCOPSW 

PGMOPSW 

30 

MCKOPSW 

IO0PSW 

40 

CSW 

CAW 

///////// | 

50 

TIMER 

/////// 

EXTNPSW 

60 

SVCNPSW 

PGMNPSW 

70 

MCKNPSW 

IONPSW 




80 

NUCROSGO 

NUCR0SG1 

NUCRSV3 

90 

///////// 

N*1 | N*2 

PERADDR 

M0NC0DE 

A0 

NUCCOPYR 

CO 



LOWSAVE 


160 

180 

ICO 

200 


FPRLOG 


GPRLOG 


ECRLOG 


SYSTEMID 


220 

26 0 
270 




INSTALID 


1 


SYSNAME 

| Nx3 | 

N*4 | 

DEVICE 

NX5 


FEIBM 
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NUCON 
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280 

CURRDATE 

CURRTIME 

290 

CURRVIRT | CURRCPUT 

LASTVIRT j LASTCPUT 

2A0 

LASTCMND 

PREVCMND 

2B0 

LASTEXEC 

PREVEXEC 

2C0 

LASTLMOD 

LASTTMOD 

2D0 

i 


SIZE 

| SIZE OF NUCON IN DOUBLEWORDSCIN HEXADECIMAL) 378 

SIZE OF THE HISTORY BUFFERCNUCHSTDA) IN DOUBLEWORDSCNUCHSTSZ) 1FFE 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 


0 

IPLPSW 

8 

INITIAL PROGRAM LOADING 

PSW 

8 

IPLCCW1 

8 

INITIAL PROGRAM LOADING 

CCW1 

10 

IPLCCW2 

8 

INITIAL PROGRAM LOADING 

CCW2 

0 

RSTNPSW 

8 

PSW RESTART NEW PSW 


8 

RSTOPSW 

8 

PSW RESTART OLD PSW 


10 

ACMSCVT 

4 

ADDRESS OF SIMULATED OS 

CVT 

14 

ASYSREF 

4 

ADDRESS OF NUCLEUS ADDRESS TABLE 

18 

EXTOPSW 

8 

EXTERNAL OLD PSW 


20 

SVCOPSW 

8 

SUPERVISOR CALL OLD PSW 


28 

PGM0PSW 

8 

PROGRAM OLD PSW 


30 

MCKOPSW 

8 

MACHINE-CHECK OLD PSW 


38 

I00PSW 

8 

INPUT/OUTPUT OLD PSW 


40 

CSW 

8 

CHANNEL STATUS WORD 


48 

CAW 

4 

CHANNEL ADDRESS WORD 


4C 


4 

RESERVED 


50 

TIMER 

4 

INTERVAL TIMER 


54 


4 

RESERVED 


58 

EXTNPSW 

8 

EXTERNAL NEW PSW 


60 

SVCNPSW 

8 

SUPERVISOR CALL NEW PSW 


68 

PGMNPSW 

8 

PROGRAM NEW PSW 


70 

MCKNPSW 

8 

MACHINE-CHECK NEW PSW 


78 

I0NPSW 

8 

INPUT/OUTPUT NEW PSW 
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NUCON 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

80 

CPULOG 

384 


CPU LOGOUT AREA 

80 

NUCROSGO 

4 


DMSROS SVC18 WORKAREA DWORDS 

84 

NUCR0SG1 

4 


DMSROS SVC18 WORKAREA ADDRESS 

88 

NUCRSV3 

8 


RESERVED FOR FUTURE USE 

90 


4 


RESERVED FOR FUTURE USE 

94 

MONCLASS 

2 

mi 

MONITOR CALL CLASS NUMBER 

96 

PERCODE 

2 

N*2 

PROGRAM EVENT RECORDER CODE 

98 

PERADDR 

4 


PROGRAM EVENT RECORDER ADDRESS 

9C 

MONCODE 

4 


MONITOR CALL CODE 

AO 

NUCC0PYR 

32 


IBM VM/SP 5664-167 1 CMS COPYRIGHT 

CO 

LOWSAVE 

160 


SAVE AREA FOR 1ST 160 BYTES OF STORAGE 

160 

FPRLOG 

32 


FLOATING POINT REGISTER LOGOUT AREA 

180 

GPRLOG 

64 


GENERAL PURPOSE REGISTER LOGOUT AREA 

ICO 

ECRLOG 

64 


EXTENDED CONTROL REGISTER LOGOUT AREA 

SYSTEM USAGE 




200 

SYSTEMID 

32 


SYSTEM NAME AND DATE 

220 

INSTALID 

64 


INSTALLATION IDENTIFICATION 

260 

SYSNAME 

8 


NAME OF IPLED SAVED SYSTEM 

268 

IPLADDR 

2 

N*3 

ADDRESS OF IPLED DEVICE 

26A 

SYSADDR 

2 

N*4 

ADDRESS OF SYSTEM DISK 

26C 

DEVICE 

4 


NAME OF DEVICE CAUSING LAST I/O INTERRUPT 

270 

HLPADDR 

2 

N*5 

ADDRESS OF HELP DISK 

272 


2 


RESERVED FOR FUTURE USE 

274 

FEIBM 

12 


COMPONENT ID-IPCS REFERENCED 

280 

DIAGTIME 

24 


BUFFER FOR DIAGNOSE TIMER 

280 

CURRDATE 

8 


CURRENT DATE - MM/DD/YY 

288 

CURRTIME 

8 


CURRENT TIME - HH.MM.SS 

290 

CURRVIRT 

4 


CURRENT ELAPSED VIRTUAL TIME USED 

294 

CURRCPUT 

4 


CURRENT ELAPSED CPU TIME USED 

298 

LASTVIRT 

4 


PREVIOUS ELAPSED VIRTUAL TIME USED 

29C 

LASTCPUT 

4 


PREVIOUS ELAPSED CPU TIME USED 

2A0 

LASTCMND 

8 


LAST COMMAND ISSUED 

2A8 

PREVCMND 

8 


NEXT TO LAST COMMAND 

2B0 

LASTEXEC 

8 


LAST EXEC PROCEDURE 

2B8 

PREVEXEC 

8 


NEXT TO LAST EXEC 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

2C0 

LASTLMOD 

8 

LAST MODULE L0ADM0DED INTO MAIN STORAGE 

2C8 

LASTTMOD 

8 

LAST MODULE LOADMODED INTO TRANSIENT AREA 

2D0 

DATIPCMS 

8 

DATE (MM/DD/YY) AT LAST IPL CMS 

2D8 

CLKVALMD 

8 

TIME (STCK FORM) AT MIDNIGHT (0000 HOURS) 

MACRO 

AND TEXT 

LIBRARY 

FIELDS 

2E0 


32 

RESERVED FOR FUTURE USE 

300 


72 

RESERVED FOR FUTURE USE 

348 

TXLIBSV 

4 

LIBE SAVE AREA TXTLIBS 

34C 

MACLBSV 

4 

LIBE SAVE AREA MACLIBS 

350 

TOTLIBS 

4 

TOTAL GLOBAL CHAINS (BYTES) 

354 

NUCTLDIR 

4 

ADDRESS OF TEXT LIBRARY DIRECTORIES 

354 

TXTDIRC 

4 

ADDRESS OF TEXT LIBRARY DIRECTORIES 

358 


72 

RESERVED FOR FUTURE USE 


DEBUG DUMP PARAMETERS 


3A0 

DUMPLIST 

0 

DEBUG DUMP 

PARAMETER LIST 

3A0 

GRS015 

4 

ADDRESS OF 

GPR SAVE AREA 

3A4 

LOC0176 

4 

ADDRESS OF 

LOW CORE SAVE AREA 

3A8 

FIRSTDMP 

4 

ADDRESS OF 

FIRST LOCATION TO DUMP 

3AC 

LASTDMP 

4 

ADDRESS OF 

LAST LOCATION TO DUMP 

3B0 

FRS06 

4 

ADDRESS OF 

FPR SAVE AREA 

3B4 

DMPTIT 

4 

ADDRESS OF 

DUMP TITLE LINE 

3BC 

DMPTITLE 

132 

DUMP TITLE 

LINE 

440 

GLBLTABL 

4 

RESERVED 


444 


2 

RESERVED FOR ALIGNMENT 

446 

SVC$202 

2 

COMMON SVC 

FOR REENTRANT CODE 

448 

ERR3202 

4 

USER WILL 

FILL IN IF NECESSARY 

44C 

BR14$202 

2 

RETURN TO 

CALLER 

44E 


2 

RESERVED 



BATCH MONITOR INFORMATION 
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NUCON 


JDISP NAME 


LEN KEY DESCRIPTION 


450 

BATFLAGS 

1 

BATCH FLAGS 


Values Defined in 

BATFLAGS 


80 

40 

20 

10 

08 

04 

02 

01 

BATRUN 

BATLOAD 

BATNOEX 

BATRERR 

BATCPEX 

BATUSEX 

BATMOVE 

BATTERM 


BATCH MONITOR RUNNING 

LOADING BATCH PROCESSOR 

SUPPRESS USER JOB EXECUTION 

BATCH READER ERROR 

CP COMMAND EXECUTING 

USER JOB EXECUTING 

MOVEFILE EXECUTING FROM TERMINAL 

USER JOB BEING FLUSHED 

451 

BATFLAG2 

1 

MORE BATCH FLAGS 


Values Defined in 

BATFLAG2 


80 

40 

20 

10 

08 

04 

02 

01 

BATXLIM 

BATXCPU 

BATXPRT 

BATXPUN 

BATDCMS 

BATIPLSS 

BATSTOP 

BATSYSAB 


USER JOB LIMIT EXCEEDED 

CPU TIME EXCEEDED 

NUMBER PRINTED LINES EXCEEDED 
NUMBER PUNCHED CARDS EXCEEDED 
DISABLED CMS COMMAND CALLED 
BATCH IPLING SAVED SYSTEM 
BATCH STOPPING AFTER CURRENT . 
SYSTEM ABEND IN PROCESS 

JOB 

452 

BATFLAG3 

1 

MORE BATCH FLAGS 


Values Defined in 

BATFLAG3 


80 

40 

20 

BATCPFNG 

BATPRT 

BATCPCH 


CPF LINK FAILURE 

LOADVFCB WAS ISSUED 

BATCH CP CHECK FLAG 


453 

BATFLAG4 

1 

BATCH VIRTUAL PRINTER TYPE 


454 

ABATPROC 

4 

MAIN ENTRY 


458 

ABATABND 

4 

USER JOB ABEND ENTRY 


45C 

ABATLIMT 

4 

USER JOB LIMITS TABLE 


460 

AUSERRST 

4 

VIRTUAL MACHINE RESTART ENTRY 

POINT 

464 

NUSERFND 

4 

FULLWORD FOR EXCLUSIVE USE OF 

USER 

468 


4 

RESERVED FOR FUTURE USE 


DOS LIBRARY FIELDS 



46C 

DOSLBSV 

4 

LIBE SAVE AREA DOSLIBS 


470 


32 

RESERVED FOR FUTURE USE 


490 


72 

RESERVED FOR FUTURE USE 


4D8 

DOSFLAGS 

1 

DOS SIMULATION FLAGS 


Values Defined in 

DOSFLAGS 


80 

40 

20 

10 

08 

04 

DOSMODE 

DOSSVC 

DOSVSAM 

DOSCOMP 

DOSPIO 

VSMINSTL 


DOS ENVIRONMENT FLAG 

DOS SVC SIMULATION FLAG 

DOS VSAM RUNNING FLAG 

DOS COMPILER RUNNING FLAG 

DOS PRINTER INDICATOR 

VSAM INSTAL FLAG TO RELOCATE 

DCSS TABLE 

4D9 

D0SRC 

i 

DOS RETURN CODE TO USER 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

4DA 


2 

RESERVED FOR FUTURE USE 

4DC 

ALTASAVE 

4 

ADDRESS OF LTA SAVE AREA 

4E0 

ABGCOM 

4 

ADDRESS OF PARTITION COMM. REGION 

4E4 

ASYSCOM 

4 

ADDRESS OF SYSTEM COMM. REGION 

4E8 

ADOSDCSS 

4 

ADDRESS OF DOS DCSS 

4 EC 

SVC12SAV 

4 

WORK AREA FOR SVC12 

4F0 

DOSFIRST 

4 

ADDRESS OF FIRST DOSCB IN CHAIN 

4F4 

DOSNUM 

2 

NUMBER DOSCB 1 S IN CHAIN 

4F6 

DOSKPART 

2 

NUMBER K-BYTES IN DOS PARTITION 

4F8 

APPSAVE 

4 

ADDRESS OF PROBLEM PROGRAM SAVE AREA 

4FC 

DOSTRANS 

4 

ADDRESS OF DOS TRANSIENT AREA 

FREE 

STORAGE POINTERS 


500 

MAINLIST 

4 

ADDRESS OF 1ST BLOCK USER FREE STORAGE 

504 

MAINSTRT 

4 

ADDRESS OF THE START OF USER FREE STORAGE 

508 

FREELIST 

4 

ADDRESS OF 1ST BLOCK OF SYSTEM STORAGE 

50C 

FREENUM 

4 

NUMBER OF BLOCKS OF SYSTEM STORAGE 

510 

MAINHIGH 

4 

HIGH EXTEND OF USER FREE STORAGE 

514 

FREELOWE 

4 

LOW EXTEND OF SYSTEM FREE STORAGE 

518 

FREELOWR 

4 

LOWER LIMIT OF SYSTEM FREE STORAGE 

51C 

FREEUPPR 

4 

UPPER LIMIT OF SYSTEM FREE STORAGE 

520 

ANUCEND 

4 

ADDRESS OF END OF NUCLEUS STORAGE AREA 

524 

AUSRAREA 

4 

ADDRESS OF BEGINNING OF USER AREA 

528 

CURRSAVE 

4 

ADDRESS OF CURRENT SAVE AREA 

52C 

CODE203 

2 

CODE NUMBER OF LAST SVC 203 

52E 

FRERESPG 

2 

AMOUNT OF USER STORAGE TO RESERVE 

FOR CMS FREE STORAGE (PAGES: > = 2) 

530 

ADMSFRT 

4 

DMSFRE WORK AREA 


V-CONSTANTS FOR CALLING "ADTLKP/ADTNXT/ADTLKW" VIA BALR CALLS 
534 VCADTLKP 4 BALR EQUIVALENT OF "ADTLKP” 

538 VCADTNXT 4 BALR EQUIVALENT OF "ADTNXT” 

53C VCADTLKW 4 BALR EQUIVALENT OF "ADTLKW" 

CONSTANT I/O POINTERS 

540 CURRIOOP 4 ADDRESS OF CURRENT I/O BUFFER 

544 PENDREAD 4 ADDRESS OF PENDING READ OPERATION 

548 PENDNRIT 4 ADDRESS OF PENDING WRITE OPERATION 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

54C 

FSTFINRD 

4 

ADDRESS OF FINISHED READ BUFFER 

550 

LSTFINRD 

4 

ADDRESS OF LAST FINISHED READ BUFFER 

554 

AINTRTBL 

4 

ADDRESS OF USER INPUT TRANSLATE TABLE 

558 

AOUTRTBL 

4 

ADDRESS OF USER OUTPUT TRANSLATE TABLE 

55C 

NUMFINRD 

2 

NUMBER OF FINISHED READ BUFFERS 

55E 

NUMPNDWR 

2 

NUMBER OF PENDING WRITE OPERATIONS 

LOADER INFORMATION 


560 

VMSIZE 

4 

VIRTUAL MEMORY SIZE 

564 

ALDRTBLS 

4 

ADDRESS OF LOADER TABLES 

568 

STRTADDR 

4 

MODULE STARTING ADDRESS 

56C 

FRSTLOC 

4 

MODULE BEGINNING ADDRESS 

570 

LASTLOC 

4 

MODULE ENDING ADDRESS 

574 

LOCCNT 

4 

LOADER LOCATION COUNTER 

578 

LDRADDR 

4 

LOADER RETURN ADDRESS 

57 C 

LDRRTCD 

4 

LOADER RETURN CODE 

580 

PSW 

8 

USER 1 S STARTING PSW 

588 

LDRFLAGS 

4 

LOADER FLAGS 

58C 

PRHOLD 

4 

PSEUDO REGISTER COUNTER 

590 

TBENT 

2 

INITIALIZE TABLE ENTRIES TO ZEROES 

592 

UNRES 

1 


593 

MODFLGS 

1 

MOD FLAGS 


Values Defined in MODFLGS 

80 NOMAPFLG 
40 CLEAROP 
20 MODGNDOS 
10 MODGNALL 
08 SYSL0AD 
04 MDPCALL 
02 LOADINCL 
01 MOD7 

594 GET1 

598 DSYM 

5A0 JSYM 

5A4 NXTSYM 

5A5 

5AC ALIASENT 
5B0 DYNAEND 
OS SIMULATION I 
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N0MAP FLAG 
CLEAR OPTION FLAG 
MODULE GENERATED WITH DOS OPTION 
MODULE GENERATED WITH ALL OPTION 
ALLOW LOAD >FREEL0WE OR <TRANS 
INDICATE CALL FROM DMSMDP 
LOAD, INCLUDE 1=L0AD 0=INCLUDE 
RESERVED FOR FUTURE USE 

4 DMSLSY R1 SAVE LOC 

8 DMSLSY WORK SPACE 

4 DMSLSY UNIQUE SYMBOL BASE 

1 1ST CHARACTER OF UNIQUE SYMBOL 

7 REST OF UNIQUE SYMBOL 

4 ALIAS ENTRY POINT (DYNAMIC LOAD) 

4 MAXIMUM LOAD LOC (DYNAMIC LOAD) 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

5B4 


4 

RESERVED 


5B8 

LABFIRST 

4 

ADDRESS OF FIRST LABSECT 

5BC 

LABNUM 

2 

NUMBER OF LABSECT'S 

5BE 

NUCSIMFG 

1 

OS SIMULATION FLAGS 


Values Defined in NUCSIMFG 


80 NUCROS80 
40 NUCSRS2 
20 NUCSRS3 
10 NUCSRS4 
08 NUCSRS5 
04 NUCSRS6 
02 NUCSRS7 
01 NUCSRS8 


SVC 18 STORAGE OBTAINED FROM DMSR 

RESERVED SIM FLAG 

RESERVED SIM FLAG 

RESERVED SIM FLAG 

RESERVED SIM FLAG 

RESERVED SIM FLAG 

RESERVED SIM FLAG 

RESERVED SIM FLAG 


5BF 


1 

RESERVED FOR FUTURE USE 

5C0 

FCBTAB 

0 

FCB CHAIN ANCHOR 

5C0 

FCBFIRST 

4 

ADDRESS OF FIRST FCB 

5C4 

FCBNUM 

2 

NUMBER OF FCB f S IN CHAIN 

5C6 


1 

RESERVED FOR WPL 

5C7 

OSSFLAGS 

1 

OS SIMULATION FLAGS 


Values Defined in OSSFLAGS 


80 COMPSWT 
40 OSSMNU 
20 OSRESET 
10 OSWAIT 


COMPILER SWITCH 

DMSSMN UNCONDITIONAL FLAG 


08 

04 

02 

01 

DYLD 

DYLIBO 

DYLIBNOW 

DYMBRNM 


DYNAMIC LOADING IN PROCESS 

OMIT DYNAMIC LIBRARY SCAN 

DYNAMIC LIBRARY SCAN 

LINKED VIA MEMBER NAME 

5C8 

ATLBMODL 

4 

ADDRESS OF TAPE LABEL PROCESSOR 

5CC 

LINKLAST 

4 

ADDRESS OF LAST OS LINKAGE BLOCK 

5D0 

LINKSTRT 

4 

ADDRESS OF ENTRY POINT OF LAST MODULE 

5D4 

TAXEADDR 

4 

TERMINAL ATTENTION EXIT ELEMENT ADDRESS 

5D8 

ATSOCPPL 

4 

ADDRESS OF TEMPORARY PLIST FOR TSO PROGRAMS 

5DC 

DCBSAV 

4 

DCB RESTORATION ADDRESS 

SWITCHES 



5E0 

OPTFLAGS 

1 

OPTION FLAGS 


Values Defined in OPTFLAGS 


80 NOIMPEX 
40 NOIMPCP 
20 NOSTDSYN 
10 NOABBREV 
08 NOPAGREL 
04 NOVMREAD 
01 RDTDRCT 


NO IMPLIED EXEC COMMANDS 
NO IMPLIED CP COMMANDS 
NO STANDARD SYNONYMS 
NO COMMAND ABBREVIATIONS 
NO AUTOMATIC PAGE RELEASE 
NO AUTOMATIC VM CONSOLE READ 
CONSOLE READ TYPE=DIRECT 
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5E1 MISFLAGS 1 MISCELLANEOUS FLAGS 

Values Defined in MISFLAGS 

80 KXSWITCH KILL EXECUTION SWITCH 

40 KOSWITCH KILL TRACING SWITCH 

20 RELPAGES RELEASE PAGES SWITCH 

10 GRAFDEV GRAPHICS CONSOLE 

08 QSWITCH QUIET SW FOR CRD 

04 NODDSK DON'T ACCESS D DISK.. 

02 NEGITS NEGATIVE RETURN CODE FROM DMSITS 

01 ATTNHIT ATTENTION POSTED 

5E2 MSGFLAGS 1 MESSAGE FLAGS 

Values Defined in MSGFLAGS 

80 NOTYPOUT NO TYPING - SET BY EXEC 

40 NOTYPING NO TYPING - SET BY KT 

20 NORDYMSG NO READY MESSAGE TO BE TYPED 

10 NORDYTIM NO TIME ON READY MESSAGE 

08 REDERRID ERROR CODE TO BE TYPED IN RED 

04 NOERRMSG NO ERROR MESSAGES TO BE TYPED 

02 NOERRTXT NO TEXT ON ERROR MESSAGES 

01 SPECLF LINEFEED FOR TYPEWRIT£R CCW 

5E3 DBGFLAGS 1 DEBUG FLAGS 


Values Defined in DBGFLAGS 


80 DBGEXEC 
40 DBGPGMCK 
20 DBGEXINT 
10 DBGABN 
08 DBGNSHR 
04 DBGSHR 
02 DBGRECUR 
| 01 ABNXTSW 


DEBUG EXECUTING 

DEBUG ENTERED BY A PROGRAM CHECK 
DEGUB ENTERED BY AN EXTERNAL INTERRUPT 
DEBUG ENTERED FROM DMSABN 
NO SHARED-SEGMENT PRESENT 
SHARED-SEGMENT PRESENT 
RECURSION FLAG 

USER ABEND EXIT TAKEN SWITCH 


5E4 MISFLAG2 1 MISCELLANEOUS FLAGS - BYTE 2 


Values Defined in MISFLAG2 


80 EXRESET 
40 OSTYPLD 
20 DONTHASH 
10 NUCTNABL 
08 NUCCPCMD 
04 NUCLKED 
02 NUC4KKEY 
01 NUCVECTR 


OSRESET WANTED— 0=YES l=NO 

OS TYPE LOAD— 0=NON-OS TYPE LOAD l=OS TYPE LOAD 

DON'T INVOKE R/W DISK HASHING 

TOD CLOCK ACCOUNTING ENABLED 

DM5INT CHECK FOR CP COMMAND 

LKED COMMAND ISSUED 

4K-BYTE BLOCK FACILITY INDICATOR 

VECTOR FACILITY IN USE - 1=YES 


| 5E5 NUCFLAG3 1 MISCELLANEOUS FLAG - BYTE 3 


Values Defined in NUCFLAG3 


80 NUCPENDW PENDING WRITE, UPDATE CMS WINDOW 

40 NUCEXEC DMSINT CHECK FOR IMPLIED EXEC 
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5E6 

EXECFLAG 

1 

EXEC FLAGS 

Values Defined in 

EXECFLAG 

80 

40 

20 

10 

08 

04 

02 

01 

EXECRUN 

EXECST0P 

EXECMASK 

EXECHALT 

EXECTRST 

NUCEXSST 

EXECTMSK 

EXECTRAC 


EXEC COMMAND RUNNING 

HALT INTERPRETER HAS BEEN RECOGNIZED 
HALT INTERPRETER ENABLED 

HALT INTERPRETER HAS BEEN ISSUED 
TRACE CAN BE RESET BY XEDIT 

EXEC SEGMENT STATUS - 0=OFF l=ON 
TRACE START ENABLED 

EXEC TRACE REQUESTED 

5E7 

PROTFLAG 

1 

STORAGE PROTECTION FLAGS 

Values Defined in 

PROTFLAG 

80 

40 

20 

PRFPOFF 

PRFTSYS 

PRFUSYS 


STORAGE PROTECTION IS SHUT OFF 

SYSTEM ROUTINE IN TRANSIENT AREA 
SYSTEM ROUTINE IN USER AREA 

5E8 

TSOFLAGS 

1 

TSO FLAG BYTE 

Values Defined in 

TSOFLAGS 

80 

TSOATCNL 


READ CANCELED BY ATTENTION 

5E9 

SUBFLAG 

1 

CMS SUBSET FLAG-BYTE 

Values Defined in 

SUBFLAG 

08 

04 

02 

01 

SUBREJ 

SUBRTN 

SUBINIT 

SUBACT 


SUBSET COMMAND REJECT 

SUBSET-RETURN 

SUBSET INITIALIZATION 

SUBSET ACTIVE 

5EA 


1 

RESERVED 

5EB 


1 

RESERVED 

5 EC 

ASYSNAMS 

4 


5F0 

NUCLANGA 

4 

LANGBLK ANCHOR 

5F4 

ADMSLIO 

4 


V-CONSTANTS FOR 

CALLING "FSTLKP/FSTLKW" VIA BALR CALLS 

5F8 

VCFSTLKP 

4 

BALR EQUIVALENT OF "FSTLKP" 

5FC 

VCFSTLKW 

4 

BALR EQUIVALENT OF "FSTLKW" 

NUCLEUS ADDRESS 

TABLE 

600 

SYSREF 

0 


600 

AFVS 

4 


604 

AOPSECT 

4 


608 

ADEVTAB 

4 


60C 

AFSTLKP 

4 


610 

AGETCLK 

4 


614 

AFSTLKW 

4 


618 

APIE 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

61C 

AIADT 

4 


620 

AUSER 

4 


624 

ARDTK 

4 


628 

ASCANN 

4 


62C 

ASSTAT 

4 


630 

ATABEND 

4 


634 

ASUBSECT 

4 


638 

ADMSSVT 

4 

ADDRESS OF DMSSVT 

63C 

AWRTK 

4 


640 

ASTRINIT 

4 


644 

IADT 

4 

ADDRESS OF START OF THE ADT 

648 

AFREE 

4 


64C 

AFRET 

4 


650 

ADMSPIOC 

4 


654 

APGMSECT 

4 


658 

AIOSECT 

4 


65C 

ADMPEXEC 

4 


660 

ADI0SECT 

4 

ADDRESS OF START OF DI0SECT 

664 

AABNSVC 

4 


668 

ADMSERL 

4 


66C 

ADMSCRD 

4 


670 

ADMSFREB 

4 


674 

ASVCSECT 

4 


678 

AADTLKP 

4 


67C 

AUPUFD 

4 


680 

ASTATEXT 

4 


684 

A0SRET 

4 

OS SVC ROUTINE RETURN ADDRESS 

688 

ACMSRET 

4 

CMS SVC ROUTINE RETURN ADDRESS 

68C 

ASCANO 

4 


690 

AEXEC 

4 


694 

ASTART 

4 


698 

AADTLKW 

4 


69C 

AUSABRV 

4 


6A0 

AEXTSECT 

4 


6A4 

ASCBPTR 

4 



LY24-5221 (c) Copyright IBM Corp. 1986 

CMS Data Areas and Control Block Logic 195 




NUCON 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP 

NAME 

LEN KEY 

6A8 

6AC 

ADMSROS 

4 

4 

6B0 

AACTLKP 

4 

6B4 

AACTNXT 

4 

6B8 

AACTFREE 

4 

6BC 

AACTFRET 

4 

6C0 

AADTNXT 

4 

6C4 

ATRKLKP 

4 

6C8 

ATRKLKPX 

4 

6CC 

AQQTRK 

4 

6D0 

AQQTRKX 

4 

6D4 

AERASE 

4 

6D8 

ATYPSRCH 

4 

6 DC 

AUPDISK 

4 

6E0 

AKILLEX 

4 

6E4 

ATFINIS 

4 

6E8 

ARDBUF 

4 

6 EC 

AWRBUF 

4 

6 FO 

AFINIS 

4 

6F4 

ASTATE 

4 

6F8 

ASTATEW 

4 

6FC 

APOINT 

4 

TERMINAL BUFFERS 

700 12 

7 0C 

710 

ATEMPLIN 

4 

48 

740 

CMNDLINE 

255 

840 

CMNDEXEC 

8 

848 

CMNDLIST 

536 

A60 

SAVE 

CONSTACK 

AREAS 

320 

BA0 

FREESAVE 

64 

BE0 

BALRSAVE 

64 


DESCRIPTION 


RESERVED FOR FUTURE USE 


RESERVED - CONCCWS MOVED TO OPSECT 

RESERVED TO MAINTAIN DISPLACEMENT 
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C20 WAITSAVE 64 

PERCENT OF AVAILABLE USER STORAGE TO RESERVE FOR GETVIS/FREEVIS USE 
NHEN RUNNING VSAM 


C60 

PCTVSAM 

2 

50 PERCENT FOR CMS/VSAM USE 

C62 


2 

RESERVED 

C64 


4 

RESERVED 

BEGINNING AND END OF 

"IKQLAB" (WHEN IN STORAGE) 

C68 

ADIKQLAB 

4 

SET TO A(IKQLAB) WHEN IT IS IN STORAGE 

C6C 

NDIKQLAB 

4 

SET TO END OF IKQLAB WHEN IN STORAGE 

C7 0 

ALOKTB 

4 

LOCK/UNLOCK RESOURCE TABLE 

C74 

ADMSVIB 

4 

ADDRESS OF VSAM INTERFACE BOOTSTRAP 

C78 

AVIPWORK 

4 

ADDRESS OF DMSVIP WORK AREA 

C7C 

VSAMFLG1 

1 

VSAM INFORMATION FLAG 

Values Defined in 

VSAMFLG1 

80 

VSAMRUN 


VSAM SYSTEM LOADED 

40 

VSJ0BCAT 


VSAM JOB CATALOG ACTIVE 

20 

VIPINIT 


DMSVIP HAS BEEN INITIALIZED 

10 

VSAMSERV 


CMS/AMS SYSTEM LOADED (AMSERV RUNNING) 

08 

VIPSOP 


OS INTERFACE SVC 2 CALL 

04 

VIPTCL0S 


OS 1 TCLOSE 1 CALL 

02 

VSAMSOS 


OS AMSERV RUNNING 

C7 D 


3 

RESERVED 

C80 

AVSAMSYS 

4 

ADDRESS OF VSAM SAVED SYSTEM 

C84 

AAMSSYS 

4 

ADDRESS OF CMSAMS SAVED SYSTEM 

C88 

AVSREOJ 

4 

DMSVSR ENTRY POINT FROM VSAM $$BACLOS 

C8C 

AVSRWORK 

4 

ADDRESS OF DMSVSR WORK AREA 

C90 

ACBLIST 

4 

ACB LIST BUILT BY OPEN/CLOSE 

C94 


4 

RESERVED 

C98 

AABWSECT 

4 

POINTER FOR IPCS 

C9C 

ADMSZIT 

4 

POINTER FOR IPCS 

SECONDARY ADDRESS 

i TABLE 

CA0 

ADMSTRKA 

4 

EDF DISK BLOCK ALLOCATE 

CA4 

ADMSTRKM 

4 

EDF DISK BLOCK MARKFUNCTION 

CA8 

ADMSTRKD 

4 

EDF DISK BLOCK DEALLOCATE 

CAC 

ADMSALU 

4 

ADDRESS OF RELEASE SUBROUTINE 

CB0 

ASORTFST 

4 

ADDRESS OF SORT FST SUBROUTINE 

CB4 

ADEVSUP 

4 

CP TO OS DEVICE TYPE CONV TABLE 

CB8 

ADEVIND 

4 

DEVICE CONST TABLE INDEX 


LY24-5221 (c) Copyright IBM Corp. 1986 

CMS Data Areas and Control Block Logic 197 



NUCON 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP 

NAME 
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KEY DESCRIPTION 

CBC 

ATBLIND 

4 

DEVICE CONSTANTS TABLE 

CCO 

ABLKIND 

4 

DEVICE BLKSIZE INDEX 

CC4 

ALABELRD 

4 

ADDRESS OF LABEL READ ROUTINE 

CC8 

ALABELWR 

4 

ADDRESS OF LABEL WRITE ROUTINE 

CCC 

ADMSLADN 

4 

LOCATE/ADD REQUESTED ADT 

CDO 

ADMSBLKR 

4 

EDF BLOCK READ ROUTINE 

CD4 

ADMSBLKW 

4 

EDF BLOCK WRITE ROUTINE 

CD8 

AABBREV 

4 

ABBREVIATION RESOLVER IN DMSINA 

CDC 

ADEVSUP2 

4 

DEVICE SUPPORT TABLE FOR FBA 

CEO 

AESTATE 

4 

EXTENDED PLIST STATE 

CE4 

AESTATEW 

4 

EXTENDED PLIST STATE FOR R/W 

CE8 

AEPOINT 

4 

EXTENDED PLIST POINT 

CEC 

ATRUNC 

4 

FILE TRUNCATE FUNCTION 

CFO 

ABAMSYS 

4 

POINTER TO CMSBAM DCSS 

CF4 

NUCSCBLK 

4 

SCBLOCK CHAIN ANCHOR 

CF8 

BAMFLAGS 

1 

CMSBAM SHARED SEGMENT FLAGS 

Values Defined : 

in BAMFLAGS 

80 

CF9 

DOSBAM 

NUCOSFLG 

i 

FB-512 SUPPORT AVAILABLE 

OS LOADER SUPPORT FLAG 


Values Defined in NUCOSFLG 


80 

40 

20 

10 

NUCOSRUN 

NUCSYSDF 

NUCGLOBL 

NUCOSRLD 


OSRUN COMMAND ISSUED 
$SYSLIB DEFINED BY LDR SUPRT 

GLOBAL DONE BY OSRUN 

MEMBER LOADED FOR OSRUN 

CFA 

NUCRSVB2 

2 

RESERVED 


CFC 

AHASHMNT 

4 

ADDRESS OF 

HASH TABLE MAINT ROUTINE 

D00 

NUCASTP 

4 

ADDRESS OF 

DMSSTP 

D04 

ASSTATX 

4 

ADDRESS OF 

SHARED COPY OF SSTAT 

D08 

ASSTATZ 

4 

ADDRESS OF 

DUMMY 2ND SSTAT HBLK 

DOC 

AYSTATX 

4 

ADDRESS OF 

SHARED COPY OF YSTAT 

DIO 

AYSTATZ 

4 

ADDRESS OF 

DUMMY 2ND YSTAT HBLK 

D14 

ADMSIOW 

4 

DMSIOW 


D18 

ADBGSECT 

4 

DEBUG WORK 

AREA 

D1C 

ADMSABW 

4 

ABEND WORK 

AREA 

D20 

ADMSERR 

4 

DMSERR 


D24 

ADMSCWT 

4 

DMSCWT 
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D28 

ADMSCWR 

4 

DMSCWR 

D2C 

ADMSIOWR 

4 

DMSIONR 

D30 

ADMSITI 

4 

DMSITI 

D34 

ADMSABN 

4 

DMSABN 

D38 

AABNGO 

4 

DMSABNGO 

D3C 

ALADAD 

4 

DMSLADAD 

D40 

ACITDB 

4 

DMSCITDB 

D44 

ADMSITSR 

4 

DMSITSR 

D48 

ADMSFRES 

4 

DMSFRES 

D4C 

ASTGSB 

4 

DMSSTGSB 

D50 

AINTAB 

4 

DMSINTAB 

D54 

ADMSCAT 

4 

DMSCAT 

D58 

ADMSCPF 

4 

DMSCPF 


D5C 

AEXCAB 

4 

ADDRESS OF EXEC ABEND RTN 

D60 

NUCFSTLN 

4 

FIRST LINE IN PROGRAM STACK 

D64 

NUCLSTLN 

4 

LAST LINE IN PROGRAM STACK 

D68 

NUCNLSTK 

4 

NUMBER OF LINES IN PROGRAM STACK 

D6C 

NUCNBSTK 

4 

NUMBER OF PROGRAM STACK 

D7 0 

NUCTIEIN 

8 

LISTING TIEIN FIELD 

D78 

NUCAFCHS 

4 

ADDRESS OF OS FETCH WORK AREA 

D7C 

NUCCBLKS 

4 

POINTER TO MODS LOADED BY DMSLOS 

D80 


72 

RESERVED FOR FUTURE USE 

DC8 

NUCLODSV 

4 

SAVE AREA FOR LOADLIB TOTALS 

DCC 

NUCWRKBK 

4 

ADDRESS OF WRKBK CHAIN 

DDO 


12 

RESERVED FOR FUTURE USE 

DDC 

NUCSVQOF 

4 

ADDRESS OF DMSSVQOF 

DEO 

NUCCWA 

4 

POINTER TO PREALLOCATED STORAGE FOR REENTRANT 
ROUTINES 

DE4 

NUCNASF 

4 

NEXT AVAILABLE LOCATION IN BLOCK POINTED TO BY 
NUCCCWA 

DE8 

NUCEOWA 

4 

BYTE AFTER BLOCK POINTED TO BY NUCCWA 

DEC 

NUCAPIO 

4 

DMSPIO ROUTINE 

DFO 

ATCBPTR 

4 

DOS TCB ADDRESS 

DF4 

AGAMSEG 

4 

GAM/SP ANCHOR BLOCK ADDRESS 

DF8 

NUCALPHA 

4 

ADDRESSCSTART OF CMS NUCLEUS CODE) 

DFC 

NUCSIGMA 

4 

ADDRESSCSTART OF NUCLEUS SHARED STOR) 
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DESCRIPTION 

E00 

NUCOMEGA 

4 

ADDRESSCEND OF CMS NUCLEUS CODE) 

| E04 

NUCNLTRT 

4 

ADDRESS OF NATIONAL LANG TRTBL 

E08 

NUCPLIST 

0 

UNTOKENIZED PLIST 

E08 

NUCPLCMD 

4 

ADDRESS OF COMMAND TOKEN 

EOC 

NUCPLBEG 

4 

ADDRESS OF START OF ARG STRING 

E10 

NUCPLEND 

4 

ADDRESS OF END OF ARG STRING 

E14 

NUCPLFID 

4 

ADDRESS OF FN FT FM IDENTIFIER 

E14 

NUCPLSWT 

1 

1-BYTE SWITCH USED IN DMSSCN 

I E18 

NUCHSHTB 

4 

ADDRESS OF DMSHTB ROUTINE 

| E1C 

NUCPATHF 

4 

ANCHOR FOR CONSOLE PATH TABLE 

| E20 

NUCDEVF 

4 

ANCHOR FOR CONSOLE DEVICE TABLE 

| E24 

NUCSMBLK 

4 

WINDOWING MASTER CONTROL BLOCK 

E28 

NUCSZABV 

4 

SIZE OF AREA ABOVE NUCLEUS FRETED 

E2C 

NUCADFNC 

4 

DMSFNC ADDRESS 

E30 

NUCLDROS 

4 

SAVE RO IN DMSLDR (NEW FORM PL) 

E34 

NUCUPPER 

4 

UPPERCASE TRANSLATE TABLE 

E38 

NUCERT 

4 

DMSERT WORK AREA ADDRESS 

E3C 

NUCXCBLK 

4 

ANCHOR FOR NUCLEUS 

E40 

NUCXFRES 

4 

CUMULATIVE AMOUNT OF TYPE=NUCLEUS FREE STORAGE 

THAT WILL BE RETAINED BY NUCLEUS EXTENSIONS 

THROUGH AN ABEND. THIS DOES NOT INCLUDE STORAGE 
ACCOUNTED FOR IN SCBLOKS IN THE NUCXCBLK CHAIN. 

THIS FIELD IS USED BY DMSABN WHEN PERFORMING 

ABEND RECOVERY. 

E44 

NUCXCBEE 

4 

SCBLOCK FREE LIST ANCHOR 

E48 

NUCUSER1 

4 

FW FOR EXCLUSIVE USE OF USERS 

E4C 

NUCUSER2 

4 

FW FOR EXCLUSIVE USE OF USERS 

E50 

NUCUSER3 

4 

FW FOR EXCLUSIVE USE OF USERS 

E54 

NUCUSER4 

4 

FW FOR EXCLUSIVE USE OF USERS 

E58 

USERLVL 

4 

RESERVED FOR USER. CONTENTS ARE RETURNED 

IN RO BY THE'QUERY CMSLEVEL 1 COMMAND. 

(SEE 1 CMSLEVEL 1 ) 

E5C 

CMSLVL 

1 

RESERVED 

E5D 

CMSPROG 

1 

UNIQUE PROGRAM PRODUCT ID 

E5E 

CMSSERV 

2 

CMS SERVICE LEVEL IN BINARY 

E60 

ACMSLVLM 

4 

ACMSLVLM IS RESERVED FOR IBM USE ONLY. IT CONTAINS 
A POINTER TO THE MESSAGE QUERY CMSLEVEL ISSUES. 

E64 

AIUCVTAB 

4 

ADDRESS OF IUCV TABLE 

E68 

NUCXEND 

4 

COUNTER OF END-OF-COMMAND NUCLEUS EXTENTIONS 
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DISP 

NAME 

LEN 

KEY DESCRIPTION 


E6C 

ABNXTPTR 

4 


ABEND EXIT ANCHOR 


E7 0 

ADMSABXR 

4 


ABNEXIT RESET ENTRY 


E74 

AIMMTABL 

4 


ADDRESS OF IMMEDIATE COMMAND WORK AREA 

E78 

IMESCAPE 

2 


IMMEDIATE COMMAND ESCAPE CHARACTER 

INFORMATION 

Bits 

defined in 

first 

byte of IMESCAPE 


80 IMACTIVE 



IMMEDIATE COMMAND ESCAPE CHARACTER 

ACTIVE 

The 

following references the second byte of IMESCAPE. 


E79 

IMCHAR 

1 


IMMEDIATE COMMAND ESCAPE CHARACTER 


| E7A 

NUCEXSMD 

1 


EXEC SEGMENT ACCESS MODE 


| E7B 


1 


RESERVED FOR FUTURE USE 


E7C 

SVCWKADR 

4 


ADDRESS OF DMSDOS SVC WORK AREA 


E80 

ADMSCSF 

4 


ADDRESS OF COMMAND SEARCH FUNCTION 


E84 

NUCEXIS 

4 


EXECS IN STORAGE CHAIN ANCHOR 


E88 

RLDDATA 

4 


ADDRESS OF THE BUFFER THAT IS USED 
SAVE RLD INFO FROM THE LOAD/GENMOD 

TO 

PROCESS 

E8C 

RLDPOINT 

4 


POINTER TO CURRENT ITEM IN RLDDATA 

BUFFER 

E90 

ADMSEXQ 

4 


BALR ENTRY POINT FOR DMSEXQ 


E94 

MISCECB 

4 


MISC. USE ECB 


E98 

NUCTODCA 

16 


TOD CLOCK ACCOUNTING AREA 


| EA8 

NUCLANGC 

5 


CURRENT LANGUAGE 


| EAD 

NUCNLLID 

1 


NATIONAL LANGUAGE LEVEL ID 


| EAE 


2 


RESERVED FOR FUTURE USE 


| EBO 

NUCLANGD 

4 


DEFAULT LANGUAGE LANGBLK POINTER 


| EB4 

NUCEXSAD 

4 


START ADDRESS OF EXEC SEGMENT 


I FIELDS USED BY THE 
| MACLIBS, LOADLIBS, 

GLOBAL COMMAND TO MAINTAIN LIBRARY LISTS FOR 

DOSLIBS AND TXTLIBS. 

| THE 

FOLLOWING FIELDS 

POINT TO THE NAME LISTS USED BY GLOBAL. 

| EB8 

NUCMLNAM 

4 


MACLIB NAME LIST ADDRESS 


| EBC 

NUCLLNAM 

4 


LOADLIB NAME LIST ADDRESS 


| ECO 

NUCDLNAM 

4 


DOSLIB NAME LIST ADDRESS 


1 EC4 

NUCTLNAM 

4 


TXTLIB NAME LIST ADDRESS 



| THE FOLLOWING FIELDS POINT TO THE LISTS OF DIRECTORY 
I POINTERS USED BY GLOBAL. 

| EC8 NUCMLDIR 4 MACLIB DIRECTORY LIST ADDRESS 
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DISP NAME LEN KEY DESCRIPTION 

| ECC NUCLLDIR 4 LOADLIB DIRECTORY LIST ADDRESS 

| EDO NUCDLDIR 4 DOSLIB DIRECTORY LIST ADDRESS 

| ED4 4 RESERVED FOR FUTURE USE 

THE FOLLOWING FIELDS CONTAIN THE SIZECIN DOUBLEWORDS) OF THE 
FREE AREAS OBTAINED BY GLOBAL TO KEEP THE NAME LISTS 
AND THE DIRECTORY POINTER LISTS. 


ED8 

NUCMLSIZ 

4 

MACLIB 

FREE 

STORAGE 

SIZE 

EDC 

NUCLLSIZ 

4 

LOADLIB 

FREE 

: STORAGE 

: size 

EEO 

NUCDLSIZ 

4 

DOSLIB 

FREE 

STORAGE 

SIZE 

EE4 

NUCTLSIZ 

4 

TXTLIB 

FREE 

STORAGE 

SIZE 


THE FOLLOWING FIELDS CONTAIN THE NUMBER OF GLOBALED 
LIBRARIES. 


EE8 

NUCMLNUM 

2 

NUMBER 

OF 

GLOBALED 

MACLIBS 

EEA 

NUCLLNUM 

2 

NUMBER 

OF 

GLOBALED 

LOADLIBS 

EEC 

NUCDLNUM 

2 

NUMBER 

OF 

GLOBALED 

DOSLIBS 

EEE 

NUCTLNUM 

2 

NUMBER 

OF 

GLOBALED 

TXTLIBS 


FIELDS FOR PRESERVING THE HISTORY INFORMATION FROM THE 
LOAD/INCLUDE GENMOD PROCESS 

| EFO NUCHSTDA 4 ADDRESS OF THE BUFFER THAT 

IS USED TO SAVE HISTORY 
INFORMATION FROM THE 
LOAD/INCLUDE/GENMOD PROCESS. 


EF4 NUCHSTPO 4 POINTER TO THE NEXT AVAILABLE 

SPACE IN THE HISTORY BUFFERCNUCHSTDA). 

EF8 NUCLANSS 4 CURRENT LANGUAGE DCSS ADDRESS 

THE FOLLOWING FIELD IS USED FOR INTERNAL QUEUE MANAGEMENT. 

EFC NUCSCRQA 4 ANCHOR FOR QMGR QBLK CHAIN. 

THE FOLLOWING FIELDS ARE USED FOR INTERNAL STORAGE POOLS. 


F00 

NUCSMSTA 

4 

ANCHOR 

FOR 

STORAGE 

POOL 

■A 

F04 

NUCSMSTB 

4 

ANCHOR 

FOR 

STORAGE 

POOL 

1 B 

F08 

NUCSMSTC 

4 

ANCHOR 

FOR 

STORAGE 

POOL 

■c 


V-CONS FOR FULLSCREEN CMS ATTN-HIT 8 WRITE-PENDING ROUTINES. 


FOC 

NUCWEXWR 

4 

DMSWEXWR 

- FULLSCREEN REFRESH 

F10 

NUCWEXRD 

4 

DMSWEXRD 

- FULLSCREEN ATTN 

F14 

NUCAPAR 

4 

ADDRESS 

OF COMMAND PARSER 

F18 

NUCCIOBF 

4 

ADDR OF 

I/O BUFFER FOR DMSCIO 

F1C 

NUCASTTV 

4 

ADDR OF 

VALIDATE ROUTINE 

F20 

NUCAXADT 

4 

ADDR OF 

ADT INDEX 
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DISP 

NAME LEN KEY 

DESCRIPTION 


F24 

NUCALADR 

4 

ADDR OF ADT RELEASE ROUTINE 


F28 

NUCGETHI 

4 

HIGHEST VALUE OF MAINHIGH 


F2C 

NUCPAGWK 

4 

ADDR OF DMSPAG WORK AREA 


F30 

NUCCSFFN 

4 

HIGH-ORDER BYTE INDICATOR 8 FILE 

NAME ADDRESS 

F34 

NUCADIE 

4 

ADDRESS OF DMSDIE 


F38 

THESE 

NUCINSTS 
VALUES ARE 

8 

USED 

INSTALLATION SEGMENT NAME 

TO RECONCILE SYSTEM STORAGE DURING 

ABEND RECOVERY 

F40 

NUCSMPST 

4 

STORAGE POOL STORAGE ALLOCATED 


F44 

NUCSMQST 

4 

PENDING MESSAGES ENQUEUED 


F48 

ADMSCACH 

4 

CACHE OF FREE ELEMENTS WORK AREA 


CROSS 

REFERENCE 

(Name 

Disp Value) 



This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AABBREV 

0CD8 

# # 

I ADMSCACH 

0F48 


AGAMSEG 

0DF4 


ASTATEXT 

0680 


AABNGO 

0D38 


ADMSCAT 

0D54 


AGETCLK 

0610 


ASTGSB 

0D4C 


AABNSVC 

0664 


ADMSCPF 

0D58 


AHASHMNT 

OCFC 


ASTRINIT 

0640 


AABWSECT 

0C98 


ADMSCRD 

066C 


AIADT 

061C 


ASUBSECT 

0634 


AACTFREE 

06B8 


ADMSCSF 

0E80 


AIMMTABL 

0E74 


ASVCSECT 

0674 


AACTFRET 

06BC 


ADMSCWR 

0D28 


AINTAB 

0D50 


ASYSCOM 

04E4 


AACTLKP 

06B0 


ADMSCWT 

0D24 


AINTRTBL 

0554 


ASYSNAMS 

05 EC 


AACTNXT 

06B4 


ADMSERL 

0668 


AIOSECT 

0658 


ASYSREF 

0014 


AADTLKP 

0678 


ADMSERR 

0D20 


AIUCVTAB 

0E64 


ATABEND 

0630 


AADTLKW 

0698 


ADMSEXQ 

0E90 


AKILLEX 

06 EO 


ATBLIND 

OCBC 


AADTNXT 

06C0 


ADMSFREB 

0670 


ALABELRD 

0CC4 


ATCBPTR 

ODFO 


AAMSSYS 

0C84 


ADMSFRES 

0D48 


ALABELWR 

0CC8 


ATEMPLIN 

07 OC 


ABAMSYS 

0CF0 


ADMSFRT 

0530 


ALADAD 

0D3C 


ATFINIS 

06E4 


ABATABND 

0458 


ADMSIOW 

0D14 


ALDRTBLS 

0564 


ATLBMODL 

05C8 


ABATLIMT 

045C 


ADMSIOWR 

0D2C 


ALIASENT 

05AC 


ATRKLKP 

06C4 


ABATPROC 

0454 


ADMSITI 

0D30 


ALOKTB 

0C7 0 


ATRKLKPX 

06C8 


ABGCOM 

04E0 


ADMSITSR 

0D44 


ALTASAVE 

04DC 


ATRUNC 

OCEC 


ABLKIND 

occo 


ADMSLADN 

OCCC 


ANUCEND 

0520 


ATSOCPPL 

05D8 


ABNXTPTR 

0E6C 


ADMSLIO 

05F4 


AOPSECT 

0604 


ATTNHIT 

05E1 

oi 

ABNXTSW 

05E3 

oi 

ADMSPIOC 

0650 


AOSMODL 

0638 


ATYPSRCH 

06D8 


ACBLIST 

0C90 


ADMSROS 

06A8 


AOSRET 

0684 


AUPDISK 

06 DC 


ACITDB 

0D40 


ADMSTRKA 

OCAO 


AOUTRTBL 

0558 


AUPUFD 

067C 


ACMSCVT 

0010 


ADMSTRKD 

0CA8 


APGMSECT 

0654 


AUSABRV 

069C 


ACMSLVLM 

0E60 


ADMSTRKM 

0CA4 


APIE 

0618 


AUSER 

0620 


ACMSRET 

0688 


ADMSVIB 

0C7 4 


APOINT 

06FC 


AUSERRST 

0460 


ACMSSEG 

05F0 


ADMSZIT 

0C9C 


APPSAVE 

04F8 


AUSRAREA 

0524 


ADBGSECT 

0D18 


ADOSDCSS 

04E8 


AQQTRK 

06CC 


AVIPWORK 

0C78 


ADEVIND 

0CB8 


AEPOINT 

0CE8 


AQQTRKX 

06D0 


AVSAMSYS 

0C80 


ADEVSUP 

0CB4 


AERASE 

06D4 


ARDBUF 

06E8 


AVSREOJ 

0C88 


ADEVSUP2 

0CDC 


AESTATE 

OCEO 


ARDTK 

0624 


AVSRWORK 

0C8C 


ADEVTAB 

0608 


AESTATEW 

0CE4 


ASCANN 

0628 


AWRBUF 

06EC 


ADIKQLAB 

0C68 


AEXCAB 

0D5C 


ASCANO 

068C 


AWRTK 

063C 


ADIOSECT 

0660 


AEXEC 

0690 


ASCBPTR 

06A4 


AYSTATX 

ODOC 


ADMPEXEC 

065C 


AEXTSECT 

06A0 


ASORTFST 

OCBO 


AYSTATZ 

0D10 


ADMSABN 

0D34 


AFINIS 

06F0 


ASSTAT 

062C 


BALRSAVE 

OBEO 


ADMSABW 

0D1C 


AFREE 

0648 


ASSTATX 

0D04 


BAMFLAGS 

0CF8 


ADMSABXR 

0E70 


AFRET 

064C 


ASSTATZ 

0D08 


BATCPCH 

0452 

20 

ADMSALU 

0CAC 


AFSTLKP 

06 OC 


ASTART 

0694 


BATCPEX 

0450 

08 

ADMSBLKR 

0CD0 


AFSTLKW 

0614 


ASTATE 

06F4 


BATCPFNG 

0452 

80 

ADMSBLKW 

0CD4 


AFVS 

0600 


ASTATEW 

06F8 


BATDCMS 

0451 

08 
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BATFLAGS 

0450 

. , 

DQSLBSV 

046C 

# # 

LASTTMOD 

02C8 


NUCEXSAD 

0EB4 


BATFLAG2 

0451 

. , 

DOSMODE 

04D8 

80 

LASTVIRT 

0298 


NUCEXSMD 

0E7A 


BATFLAGS 

0452 

, . 

DOSNUM 

04F4 


LDRADDR 

0578 


NUCEXSST 

05E6 

04 

BATFLAG4 

0453 

• • 

D0SPI0 

04D8 

08 

LDRFLAGS 

0588 


NUCFLAG3 

05E5 


BATIPLSS 

0451 

04 

DOSRC 

04D9 

# # 

LDRRTCD 

057C 


NUCFSTLN 

0D6 0 


BATLOAD 

0450 

40 

DOSSVC 

04D8 

40 

LINKLAST 

05CC 


NUCGETHI 

0F28 


BATMOVE 

0450 

02 

DOSTRANS 

04FC 

, , 

LINKSTRT 

05D0 


NUCGLOBL 

0CF9 

20 

BATNOEX 

0450 

20 

DOSVSAM 

04D8 

20 

LOADINCL 

0593 

02 

NUCHSHTB 

0E18 


BATPRT 

0452 

40 

DSYM 

0598 

# , 

LOCCNT 

0574 


NUCHSTDA 

OEFO 


BATRERR 

0450 

10 

DUMPLIST 

03A0 

, , 

LOC0176 

03A4 


NUCHSTPO 

0EF4 


BATRUN 

0450 

80 

DYLD 

05C7 

08 

LOWSAVE 

OOCO 


NUCHSTSZ 


iFFE 

BATSTOP 

0451 

02 

DYLIBNOW 

05C7 

02 

LSTFINRD 

0550 


NUCINSTS 

0F38 


BATSYSAB 

0451 

01 

DYLIBO 

05C7 

0 4 

MACLBSV 

034C 


NUCLANGA 

05F0 


BATTERM 

0450 

01 

DYMBRNM 

05C7 

01 

MAINHIGH 

0510 


NUCLANGC 

0EA8 


BATUSEX 

0450 

04 

DYNAEND 

05B0 

# # 

MAINLIST 

0500 


NUCLANGD 

OEBO 


BATXCPU 

0451 

40 

ECRLOG 

01C0 

• • 

MAINSTRT 

0504 


NUCLANSS 

0EF8 


BATXLIM 

0451 

80 

ERRS202 

0448 

0 # 

MCKNPSW 

0070 


NUCLDROS 

0E30 


BATXPRT 

0451 

20 

EXECFLAG 

05E6 

# # 

MCKOPSW 

0030 


NUCLKED 

05E4 

04 

BATXPUN 

0451 

10 

EXECHALT 

05E6 

10 

MDPCALL 

0593 

04 

NUCLLDIR 

OECC 


BR14$202 

044C 


EXECMASK 

05E6 

20 

MISCECB 

0E94 


NUCLLNAM 

OEBC 


CAW 

0048 


EXECRUN 

05E6 

80 

MISFLAGS 

05E1 


NUCLLNUM 

OEEA 


CDMSROS 

06AE 


EXECSTOP 

05E6 

40 

MISFLAG2 

05E4 


NUCLLSIZ 

OEDC 


CLEAROP 

0593 

40 

EXECTMSK 

05E6 

02 

MODFLGS 

0593 


NUCLODSV 

0DC8 


CLKVALMD 

02D8 


EXECTRAC 

05E6 

01 

MODGNALL 

0593 

io 

NUCLSTLN 

0D64 


CMNDEXEC 

0840 


EXECTRST 

05E6 

08 

MODGNDOS 

0593 

20 

NUCMLDIR 

0EC8 


CMNDLINE 

0740 


EXRESET 

05E4 

80 

M0D7 

0593 

01 

NUCMLNAM 

0EB8 


CMNDLIST 

0848 


EXTNPSW 

0058 


MONCLASS 

0094 


NUCMLNUM 

0EE8 


CMSLVL 

0E5C 


EXTOPSW 

0018 


MONCODE 

009C 


NUCMLSIZ 

0ED8 


CMSPROG 

0E5D 


FCBFIRST 

05C0 


MSGFLAGS 

05E2 

. . 

NUCNASF 

0DE4 


CMSSERV 

0E5E 


FCBNUM 

05C4 


NDIKQLAB 

0C6C 


NUCNBSTK 

0D6C 


CODE203 

052C 


FCBTAB 

05C0 


NEGITS 

05E1 

02 

NUCNLLID 

OEAD 


COMPSWT 

05C7 

80 

FEIBM 

0274 


NOABBREV 

05E0 

10 

NUCNLSTK 

0D68 


CONSTACK 

0A6 0 


FIRSTDMP 

03A8 


NODDSK 

05E1 

04 

NUCNLTRT 

0E04 


CPULOG 

0080 


FPRLOG 

0160 


NOERRMSG 

05E2 

04 

NUCOMEGA 

0E00 


CSW 

0040 


FREELIST 

0508 


NOERRTXT 

05E2 

02 

NUCOSFLG 

0CF9 


CURRCPUT 

0294 


FREELOWE 

0514 


NOIMPCP 

05E0 

40 

NUCOSRLD 

0CF9 

io 

CURRDATE 

0280 


FREELOWR 

0518 


NOIMPEX 

05E0 

80 

NUCOSRUN 

0CF9 

80 

CURRIOQP 

0540 


FREENUM 

050C 


NOMAPFLG 

0593 

80 

NUCPAGWK 

0F2C 


CURRSAVE 

0528 


FREESAVE 

OBAO 


NOPAGREL 

05E0 

08 

NUCPATHF 

0E1C 


CURRTIME 

0288 


FREEUPPR 

051C 


NORDYMSG 

05E2 

20 

NUCPENDW 

05E5 

80 

CURRVIRT 

0290 


FRERESPG 

052E 


NORDYTIM 

05E2 

10 

NUCPLBEG 

OEOC 


DATIPCMS 

02D0 


FRSTLOC 

056C 


NOSTDSYN 

05E0 

20 

NUCPLCMD 

0E08 


DBGABN 

05E3 

io 

FRS06 

03B0 


NOTYPING 

05E2 

40 

NUCPLEND 

0E10 


DBGEXEC 

05E3 

80 

FSTFINRD 

054C 


NOTYPOUT 

05E2 

80 

NUCPL FID 

0E14 


DBGEXINT 

05E3 

20 

GET1 

0594 


NOVMREAD 

05E0 

04 

NUCPL1ST 

0E08 


DBGFLAGS 

05E3 

. , 

GLBLTABL 

0440 


NUCADFNC 

0E2C 


NUCPLSWT 

0E14 


DBGNSHR 

05E3 

08 

GPRLOG 

0180 

** 1 

| NUCADIE 

0F34 


NUCROSGO 

0080 


DBGPGMCK 

05E3 

40 

GRAFDEV 

05E1 

10 

NUCAFCHS 

0D78 


NUCROSG1 

0084 


DBGRECUR 

05E3 

02 

GRS015 

03A0 

.. 1 

| NUCALADR 

0F24 


NUCRSVB2 

OCFA 


DBGSHR 

05E3 

04 

HLPADDR 

0270 


NUCALPHA 

0DF8 


NUCRSV3 

0088 


DCBSAV 

05DC 

. . 

IADT 

0644 

I 

| NUCAPAR 

0F14 


NUCRS2 

05BE 

40 

DCSSAVAL 

05EA 

80 

IMESCAPE 

0E78 


NUCAPIO 

ODEC 


NUCRS3 

05BE 

20 

DCSSCPNV 

05EA 

20 

INSTALID 

0220 


NUCASTP 

0D00 


NUCRS4 

05BE 

10 

DCSSFLAG 

05EA 

. . 

IONPSW 

0078 


NUCASTTV 

0F1C 


NUCRS5 

05BE 

08 

DCSSJLNS 

05EA 

01 

IOOPSW 

0038 


NUCAXADT 

0F20 


NUCRS6 

05BE 

04 

DCSSLDED 

05EA 

40 

IPLADDR 

0268 


NUCCBLKS 

0D7C 


NUCRS7 

05BE 

02 

DCSSLDSD 

05EA 

10 

IPLCCW1 

0008 


| NUCCIOBF 

0F18 


NUCRS8 

05BE 

01 

DCSSOVLP 

05EA 

02 

IPLCCW2 

0010 


NUCCOPYR 

00A0 


NUCSCBLK 

0CF4 


DCSSVTLD 

05EA 

04 

IPLPSW 

0000 


NUCCPCMD 

05E4 

08 | 

| NUCSCRQA 

OEFC 


DCSSVTNA 

05EA 

08 

JSYM 

05A0 


NUCCSFFN 

0F30 


NUCSIGMA 

ODFC 


DEVICE 

026C 

, * 

KOSWITCH 

05E1 

40 

NUCCWA 

ODEO 


NUCSIMFG 

05BE 

80 

DIAGTIME 

0280 

* . 

KXSWITCH 

05E1 

80 

NUCDEVF 

0E20 


NUCSMBLK 

0E24 


DMPTIT 

03B4 

, . 

LABFIRST 

05B8 


NUCDLDIR 

OEDO 


NUCSMPST 

0F40 


DMPTITLE 

03BC 

. . 

LABNUM 

05BC 


NUCDLNAM 

OECO 


NUCSMQST 

0F44 


DONTHASH 

05E4 

20 

LASTCMND 

02A0 


NUCDLNUM 

OEEE 


NUCSMSTA 

0F00 


DOSBAM 

0CF8 

80 

LASTCPUT 

029C 


NUCDLSIZ 

OEEO 


NUCSMSTB 

0F04 


D0SC0MP 

04D8 

10 

LASTDMP 

03AC 


NUCEOWA 

0DE8 


NUCSMSTC 

0F08 


DOSFIRST 

04F0 

. . 

LASTEXEC 

02B0 


NUCERT 

0E38 


NUCSVQOF 

ODDC 


DOSFLAGS 

04D8 

, . 

LASTLMOD 

02C0 


1 NUCEXEC 

05E5 

40 

NUCSYSDF 

0CF9 

40 

DOSKPART 

04F6 

. . 

LASTLOC 

0570 


NUCEXIS 

0E84 

. , 

NUCSZABV 

0E28 

. . 
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CROSS REFERENCE (Name Disp Value) 


NUCTIEIN 

0D7 0 


OPTFLAGS 

05E0 

, , 

RELPAGES 

05E1 

20 

TIMER 

0050 


NUCTLDIR 

0354 


0SM0DLDW 

05B4 

t , 

RLDDATA 

0E88 

, , 

TOTLIBS 

0350 


NUCTLNAM 

0EC4 


OSRESET 

05C7 

20 

RLDDNSZ 

.... 

2000 

TSOATCNL 

05E8 

80 

NUCTLNUM 

OEEE 


OSSFLAGS 

05C7 

. , 

RLDP0INT 

0E8C 

• • 

TSOFLAGS 

05E8 


NUCTLSIZ 

0EE4 


OSSMNU 

05C7 

40 

RSTNPSW 

0000 

# # 

TXLIBSV 

0348 


NUCTNABL 

05E4 

io 

OSTYPLD 

05E4 

40 

RSTQPSW 

0008 


TXTDIRC 

0354 


NUCTODCA 

0EA8 


OSWAIT 

05C7 

10 

SPECLF 

05E2 

01 

UNRES 

0592 


NUCUPPER 

0E34 


PCTVSAM 

0C60 


STRTADDR 

0568 

9 # 

USERLVL 

0E58 


NUCUSER1 

0E48 


PENDREAD 

0544 


SUBACT 

05E9 

01 

VCADTLKP 

0534 


NUCUSER2 

0E4C 


PENDNRIT 

0548 


SUBFLAG 

05E9 

# # 

VCADTLKW 

053C 


NUCUSER3 

0E50 


PERADDR 

0098 


SUBINIT 

05E9 

02 

VCADTNXT 

0538 


NUCUSER4 

0E54 


PERCODE 

0096 


SUBREJ 

05E9 

08 

VCFSTLKP 

05F8 


NUCVECTR 

05E4 

oi 

PGMNPSW 

0068 


SUDRTN 

05E9 

04 

VCFSTLKW 

05FC 


NUCWEXRD 

0F10 


PGMOPSN 

0028 


SVCNPSW 

0060 


VIPINIT 

0C7C 

20 

NUCWEXWR 

0F0C 


PREVCMND 

02A8 


SVCOPSW 

0020 


VIPSOP 

0C7C 

08 

NUCWRKBK 

ODCC 


PREVEXEC 

02B8 


SVCWKADR 

0E7C 


VIPTCLOS 

0C7C 

04 

NUCXCBEE 

0E44 


PRFPOFF 

05E7 

80 

SVC12SAV 

04 EC 


VMSIZE 

0560 

# 

NUCXCBLK 

0E3C 


PRFTSYS 

05E7 

40 

SVCS2Q1 

0446 


VSAMFLG1 

0C7C 

# # 

NUCXEND 

0E68 


PRFUSYS 

05E7 

20 

SYSADDR 

026 A 


VSAMRUN 

0C7C 

80 

NUCXFRES 

0E40 


PRHOLD 

058C 

# # 

SYSLOAD 

0593 

08 

VSAMSERV 

0C7C 

10 

NUC4KKEY 

05E4 

02 

PROTFLAG 

05E7 

, . 

SYSNAME 

0260 


VSAMSOS 

0C7C 

02 

NUMFINRD 

055C 


PSN 

0580 

, , 

SYSREF 

0600 


VSJOBCAT 

0C7C 

40 

NUMPNDWR 

055E 


QSWITCH 

05E1 

08 

SYSTEMID 

0200 


VSMINSTL 

04D8 

04 

NUSERFND 

0464 


RDTDRCT 

05E0 

01 

TAXEADDR 

05D4 


WAITSAVE 

0C20 

# # 

NXTSYM 

05A4 


REDERRID 

05E2 

08 

TBENT 

0590 
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OCTSs OPEN/CLOSE TRANSIENT SVA PLIST 

OCTS describes the fields in the OPEN/CLOSE transient SVA PLIST used in the CMS/DOS 
environment. OCTS is invoked by the OCTS macro. 


0 

0CTGVSIZ 

OCTSPPSV 

8 

0CTM0NSV 

0CTM0NAD 

10 

0CTDXBUF 

0CTDTFLP 

18 

OCTDXLEN | 0^1 | 0X2 

OCTSTADR 

20 



USRREGSV 


78 


MONREGSV 


C8 

128 


DLBLAREA 


SIZE 

USER REG SAVE AREA LENGTH IN BYTES CUSRRGLEN) 058 
OCTS LENGTH IN DOUBLEWORDS (OCTSDWDS) 026 


OCTS 

LENGTH IN 

BYTES 

COCTSLEN) 130 

HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

OCTSPLST 

0 


0 

OCTGVSIZ 

4 

SIZE OF OCTS 

4 

OCTSPPSV 

4 

PP REG SAVE AREA POINTER 

8 

OCTMONSV 

4 

IJJGMTOP SAVE AREA POINTER 

C 

0CTM0NAD 

4 

ADDRESS OF SIJJGTOP 

10 

OCTDXBUF 

4 

RESERVED FOR VSAM SPACE MANAGEMENT 

14 

OCTDTFLP 

4 

POINTER TO NEXT ENTRY IN DTF LST 

18 

OCTDXLEN 

2 

RESERVED FOR VSAM SPACE MANAGEMENT 

1A 

0CT1FLAG 

1 OX1 

FLAG BYTE 


Values Defined in OCT1FLAG 


80 OCTCPDI 
40 OCTDITYP 
20 OCTSPMGT 


CP/DI INDICATOR 
DTFDI INDICATOR 

RESERVED FOR VSAM SPACE MANAGEMENT 
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OCTS 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

IB 

0CT2FLAF 

1 

0X2 

SECOND FLAG BYTE... UNUSED 

1C 

OCTSTADR 

4 


ADDRESS OF START OF OCTS PLIST 

20 

OCTSEXTN 




20 

USRREGSV 

88 


USERS REG SAVE AREA 

78 

MONREGSV 

80 


IJJGMTOP SAVE AREA 

C8 

W0RKAREA 




C8 

DLBLAREA 

104 


RESERVED FOR VSAM SPACE MANAGEMENT 

130 

OCTSEND 




CROSS 

REFERENCE 

! (Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

DLBLAREA 00C8 .. OCTDXLEN 0018 .. OCTSEXTN 001C 20 0CT1FLAG 001A .. 

MONREGSV 0078 .. OCTGVSIZ 0000 .. OCTSLEN _ XX 0CT2FLAF 001B .. 

OCTCPDI 001A 80 OCTMONAD 000C .. OCTSPLST 0000 .. USRREGSV 0020 .. 

OCTDITYP 001A 40 0CTM0NSV 0008 .. OCTSPMGT 001A 20 USRRGLEN _ 58 

OCTDTFLP 0014 .. GCTSDWDS _ 26 0CTSPPSV 0004 .. NORKAREA 00C8 .. 

OCTDXBUF 0010 .. OCTSEND 0130 .. OCTSTADR 001C .. 

i 


* 


( 
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OPSECT: MAJOR CSECT FOR ALL I/O OPERATION LISTS 

OPSECT describes the fields that several programs use as parameter lists for reading 
and writing on disks and other devices. The OPSECT CSECT is pointed to by the 
AOPSECT field in NUCON. OPSECT is invoked via the 10 macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

58 

60 

68 

70 

78 

80 

88 

90 

98 

A0 

A8 

B0 

B8 

CO 

C8 

DO 


CMS0P 

FILENAME 

FILETYPE 

FILEMODE | ///////// 

FILEBUFF 

FILEBYTE 

FILEFORM | ////////// 

FILEREAD 

FILEITEM 

FILEC0UT 

FILEWPTR 

FILERPTR 

SAVER14 

SAVER15 

SAVER0 

SAVERl 

CMSNAME 

CMSNAME (CONT.) 

////////////////////// 

C0NREAD 1 

CONRDBUF 

0X1 | /// j C0NRDCNT 

//////////////////// 

WAITLIST 

WAITLIST 

CONWRITE 

CONWRITE 

C0NWRBUF 

0X2 | /// | C0NWRNCT 

WAITLST 

WAITLST 

WAITDEV 



C0NPCCN 


CQNCCWS 


READLST 

RDBUFF J RDCCW J RDC0UNT 

PUNCHLST 

PUNBUFF J PUNCOUNT 

PRINTLST 

- T - 
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OPSECT 


D8 

EO 

E8 

FO 

F8 

100 

108 

110 

118 

120 

128 

130 

138 

140 

148 

150 

158 

160 

168 

170 


180 


1A8 

1B0 

1B8 

ICO 

1C8 

1D0 

1D8 


1E0 


228 
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PRBUFF 

— 

o 

* 

CM 

— 

o 

* 

— 

1 

1 

-Q 1 
73 1 
I— 1 

m 1 

Z 1 
1 
1 
1 
1 

0X5 | 0X6 | 0X7 | 0X8 

PRCCW 

PRCNT 1 RESERVED 

TAPELIST 

TAPELIST 

TAPEOPER 

TAPEOPER 

TAPEDEV 

0X9 | TAPEBUFF 

TAPESIZE 

TAPECOUT 

CLOSIO 

CLOSIO 

CLOSIODV 

CLOSIODV 

RESERVED 


UNUSED 

UNUSED 

UNUSED 

UNUSED 

UNUSED 

UNUSED 


EXLEVEL 

EXNUM 

EXGL0BAL 

FCBI0 


EXF1 

EXADD 

//////////////////// 

0*A T /////////////// 


EXQSAVE 


EXQ0LD2 


[ EXQ0LD13 

EXQCMD 


EXQNAME 

EXQTYPE 


EXQMODE J ///////// J 

EXQEND 

0*B J 0XC J ////////////////////////////////// 


EXQFST 


CONQSAVE 


QPLNAME 
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230 
238 
240 
248 
250 
258 
260 
268 
27 0 
278 
280 
288 
290 
298 
2A0 
2A8 
2B0 
2B8 
2C0 
2C8 


HEX 


DISP 

NAME 

LEN KEY DESCRIPTION 

0 

PLIST 

0 


0 

CMSOP 

8 

I/O OPERATION COMMAND WORD 

8 

FILENAME 

8 

FILE NAME 

10 

FILETYPE 

8 

FILE TYPE 

18 

FILEMODE 

2 

FILE MODE 

1A 


2 

RESERVED 

1C 

FILEBUFF 

4 

INPUT-OUTPUT BUFFER 

1C 

AFST 

4 
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OXD | RESERVED 

QPLCNAME 

QPLCNAME 

QPLXADDR 

QPLMLIM 

QPLMSGAD 

QPLMSGLN 

RESERVED 

QNXTBLK 

QNAME 

QNAME 

0*E | RESERVED 

QCNAME j 

QXADDR 

QMLIMIT 

QMC0UNT 

QMHEAD 

QMTAIL 

RESERVED 

RESERVED 

RESERVED 

LRDPSVCN 

LRDPDATA 

LRDPDATL j 

LRDPVSNM | LRDPLINE 

LRDPCOL | LRDPPBUF 

LRDPPLEN 

OXF | OXlQ| UNUSED 

LNENUM 

COLNUM 

CONINBLK 

0X11| 0X12| CONINBUF 


C0NINBUF 
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OPSECT 


)ISP 

NAME 

LEN 

KEY 

DESCRIPTION 

1C 

IOAREA 

4 


BUFFER AREA LOCATION 

20 

FILEBYTE 

4 


DATA COUNT 

20 

IOLENGTH 

4 


BUFFER LENGTH 

24 

FILEFORM 

2 


FILE FORMAT: FIXED/VARIABLE RECORDS 

26 


2 


RESERVED 

28 

FILEREAD 

4 


READ DATA COUNT 

2C 

FILEITEM 

4 


ITEM NUMBER 

2C 

POINTERS 

4 



30 

FILECOUT 

4 


NUMBER OF ITEMS 

34 

FILEWPTR 

4 


WRITE POINTER 

38 

FILERPTR 

4 


READ POINTER 

IMMEDIATE REGISTER 

SAVE 

AREA 

3C 

SAVER14 

4 


TEMPORARY R14 SAVE 

40 

SAVER15 

4 


TEMPORARY R15 SAVE 

44 

SAVER0 

4 


TEMPORARY RO SAVE 

48 

SAVER1 

4 


TEMPORARY R1 SAVE 

4C 

CMSNAME 

8 


"DEFAULT FILENAME" 

CONSOLE PARAMETER 1 

LISTS 

READ CONSOLE 

58 

CONREAD 

8 


TERMINAL READ 

60 

CONRDBUF 

4 


ADDRESS OF INPUT BUFFER 

64 

C0NRDC0D 

1 

0X1 

TRANSLATE CODE 

65 


1 


RESERVED 

66 

CONRDCNT 

2 


DATA BYTE COUNT 

68 


4 


RESERVED 

CONSOLE WAIT LIST 



6C 

WAITLIST 

8 



WRITE 

CONSOLE 




74 

CQNWRITE 

8 



7C 

C0NWRBUF 

4 


LOCATION OF MESSAGE TEXT 

80 

CONWRCOD 

1 

0X2 

COLOR CODE 

81 


1 


RESERVED 

82 

CONWRCNT 

2 


LENGTH OF MESSAGE TEXT 

WAIT 

PARAMETER 

LIST 


84 

WAITLST 

8 



8C 

WAITDEV 

4 
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DISP NAME LEN KEY DESCRIPTION 


90 4 RESERVED 

94 4 RESERVED 

INTERACTIVE CONSOLE COMMUNICATION CHANNEL PROGRAM 


98 

CONPCCW 

8 

WRITE FOR APL ASCII PROMPT 

AO 

CONCCWS 

8 

NORMAL READ OR WRITE 

A8 


8 

NOP TO GET CE AND DE TOGETHER 

READER PARAMETER 

LIST 


BO 

READLST 

8 


B8 

RDBUFF 

4 

BUFFER ADDRESS 

BC 

RDCCW 

2 

CCW BYTE COUNT 

BE 

RDCOUNT 

2 

BYTES ACTUALLY READ 

CARD 

PUNCH PARAMETER LIST 

CO 

PUNCHLST 

8 


C8 

PUNBUFF 

4 

PUNCH BUFFER ADDRESS 

CC 

PUNCOUNT 

4 

PUNCH CCW COUNT 

PRINTER PARAMETER LIST 


DO 

PRINTLST 

8 


D8 

PRBUF 

4 

PRINTER BUFFER ADDRESS 

DC 

PRTRC 

1 0X3 

TRC BYTE 

DD 

PRFLGS1 

1 0X4 

PRINT FLAGS 


Values Defined in PRFLGS1 


80 PRXPLIST 
08 PR3800 
04 PRTRCINP 
02 PRTRCIND 
01 PRN0ASA 

| DE PRLEN 2 

EXTENDED PLIST 


FO PRFLGS2 1 0X5 


EXTENDED PLIST IN USE 
VIRTUAL PRINTER IS A 3800 
PLIST TRC BYTE IS VALID 
TRC IN DATA 
CC BYTE NOT ASCII 

PRINT DATA LENGTH 


PRINT FLAGS 


Values Defined in PRFLGS2 


04 PRCCINP 
02 PRCMSDEV 
01 PRFORM 


CONTROL CHARACTER IN PLIST 
CMSDEV INFORMATION IN PLIST 
0: FGRM=BUFFER, 1: F0RM=LIST 


El 

PRCC 

1 

0X6 

E2 

PRDEVC 

1 

0X7 

E3 

PRDEVT 

1 

0X8 

E4 

PRCCW 

4 



CONTROL CHARACTER 
PRINTER DEVICE CLASS 
PRINTER DEVICE TYPE 
CCW BUFFER ADDRESS 
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OPSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

E8 

PRCNT 

2 

PRINT RECORD COUNT 

EA 


2 

RESERVED FOR FUTURE USE 

EC 

PRINTEND 

0 

END OF PRINTER PLIST 

END 

OF PRINTER 

PLIST 


TAPE 

: PARAMETER 

LIST 


EC 

TAPELIST 

8 


F4 

TAPEOPER 

8 

TAPE OPERATION COMMAND 

FC 

TAPEDEV 

4 

TAPE SYMBOLIC DEVICE 

100 

TAPEMASK 

1 0X9 

SET MODE 

101 

TAPEBUFF 

3 

BUFFER LOCATION 

104 

TAPESIZE 

4 


108 

TAPEC0UT 

4 

TAPE COUNTER 

CLOSE OUT DEVICE DEPENDENT DATA SET ON UNIT RECORD EQUIPMENT 

10C 

CLOSIO 

8 


114 

CLOSIODV 

8 

DEVICE TYPE 

11C 


4 

RESERVED 

120 


48 

UNUSED 

STORAGE FOR EXEC BOOTSTRAP 

150 

EXLEVEL 

4 

EXEC "LEVEL" 

154 

EXF1 

4 

(FOLLOWS EXLEVEL) 

158 

EXNUM 

4 

NUMBER DOUBLEWORDS FREE STORAGE 

15C 

EXADD 

4 

ADDRESS OF "EXECTOR" CORE-IMAGE 

160 

EXGLOBAL 

4 

ADDRESS OF EXEC GLOBAL AREA 

164 


4 

RESERVED 

STORAGE FOR OS 

MACRO SIMULATION ROUTINES 

168 

FCBIO 

4 

ADDRESS OF LAST FCB USED DURING I/O 

16C 

OSIOTYPE 

1 OXA 

OS ACCESS METHOD TYPE 

REGISTER SAVE AREA AND 

WORK AREA FOR DMSEXQ 

170 

EXQWORK 

0 


170 

EXQSAVE 

16 

SAVEAREA FOR R14-R1 

180 

EXQOLD2 

44 

SAVEAREA FOR R2-R12 

1AC 

EXQ0LD13 

4 

SAVEAREA FOR R13 

1B0 

EXQCMD 

8 

USED AS PLIST FOR STATE CMD 

1B8 

EXQNAME 

8 

EXECNAME PASSED IN PARMLIST 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

ICO 

EXQTYPE 

8 

EXECTYPE PASSED IN PARMLIST 

1C8 

EXQMODE 

2 

FILEMODE FOR STATE COMMAND 

1CA 


2 

RESERVED 

ICC 

EXQFST 

4 

FST ADDRESS FROM STATE 

IDO 

EXQEND 

8 

FENCE FOR STATE 

1D8 

EXQFLAG 

1 0*B 

FLAG FOR OPTIONS 

1D9 

SAVEBYTE 

1 OXC 

SAVE MESSAGE FLAG SETTING 

IDA 


6 

RESERVED 

1E0 

CONQSAVE 

72 

QUEUE MANAGER SAVE AREA 

QUEUE 

PARAMETER 

LIST 


228 

QPLST 

0 

QUEUE MANAGER PLIST 

228 

QPLNAME 

8 

QUEUE NAME 

230 

QPLOPTNS 

1 OXD 

OPTIONS FLAG BYTE 


Values Defined in QPLOPTNS 

80 QPLCLFLG 
40 QPLCNFLG 
20 QPLCCFLG 
10 QPLXAFLG 
08 QPLMLFLG 
04 QPLMDFLG 
02 QPLQYFLG 

01 

I 231 3 

| 234 QPLCNAME 8 

| 23C QPLXADDR 4 

| 240 QPLMLIM 4 

| 244 QPLMSGAD 4 

248 QPLMSGLN 4 
Value Defined 

24 QPLSTLEN 

| 1 '*C 4 

| 250 CMSQPLK 0 

| 250 QNXTBLK 4 

| 254 QNAME 8 


QUEUE CLASS- 0N=INPUT QUEUE; 0FF=0UTPUT QUEUE 
QUEUE CONNECTION SPECIFIED 
CLASS OF THE CONNECTED QUEUE 
QUEUE EXIT SPECIFIED 
QUEUE MESSAGE LIMIT SPECIFIED 
PUT MODE- 0N=LIF0; 0FF=FIF0 
QUERY FUNCTION REQUEST- 
ON =QUERY CONNECTION 
0FF=QUERY MESSAGE COUNT 
RESERVED 

RESERVED FOR FUTURE USE 
CONNECTED QUEUE NAME 
EXIT ROUTINE ADDRESS 
MESSAGE LIMIT 
MESSAGE ADDRESS 
MESSAGE LENGTH 


LENGTH OF QPLST IN BYTES 
UNUSED 


FWD PTR - NEXT QUEUE BLOCK 
NAME OF THIS QUEUE 
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OPSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

25C 

QFLAGS 

1 OXE 

QUEUE FLAG BYTE 

Values Defined in QFLAGS 

80 

40 

20 

10 

08 

QCLFLAG 

QCNFLAG 

QCNCFLAG 

QXAFLAG 

QMLFLAG 


QUEUE CLASS- INPUT OR OUTPUT 

QUEUE CONNECTION SPECIFIED 

CLASS OF THE CONNECTED QUEUE 

QUEUE EXIT ADDRESS SPECIFIED 

QUEUE MESSAGE LIMIT SPECIFIED 

25D 


3 

RESERVED FOR FUTURE USE 

260 

QCNAME 

8 

CONNECTED QUEUE NAME 

268 

QXADDR 

4 

EXIT ROUTINE NAME 

26C 

QMLIMIT 

4 

MAXIMUM NUMBER OF MESSAGES 

270 

QMCOUNT 

4 

NUMBER OF MESSAGES QUEUED 

274 

QMHEAD 

4 

HEAD OF MESSAGE QUEUE 

278 

QMTAIL 

4 

TAIL OF MESSAGE QUEUE 

27C 


20 

RESERVED FOR FUTURE USE 

LINERD PARAMETER LIST 


290 

LRDP 

0 

LINE READ PLIST 

290 

LRDPSVCN 

8 

8-BYTE SVC NAME 

298 

LRDPDATA 

4 

DATA BUFFER ADDRESS 

29C 

LRDPDATL 

4 

DATA BUFFER LENGTH 

2A0 

LRDPVSNM 

4 

ADDRESS OF VIRTUAL SCREEN NAME 

2A4 

LRDPLINE 

4 

ADDRESS OF LINE NUMBER OF DATA READ 

2A8 

LRDPCOL 

4 

ADDRESS OF COLUMN NUMBER OF DATA READ 

2AC 

LRDPPBUF 

4 

ADDRESS OF PROMPT BUFFER 

2B0 

LRDPPLEN 

4 

LENGTH OF PROMPT BUFFER 

2B4 

LRDPFLG1 

1 OXF 

EDIT OPTIONS — BYTE 1 


Values Defined in LRDPFLG1 


80 LRDPPAD 
40 LRDPPADC 
20 LRDPDRCT 
10 LRDPMASK 
08 LRDPSTCK 
04 LRDPLGCL 
02 LRDPTRNS 
01 LRDPTRUP 


PAD INPUT (BLANKS OR NULLS) 
PAD INPUT WITH BLANKS 
READ DIRECT 

INHIBIT DISPLAY OF INPUT DATA 
CHECK THE PROGRAM STACK 
READ A LOGICAL LINE 
TRANSLATE INPUT DATA 
TRANSLATE TO UPPER CASE 


(c) Copyright IBM Corp. 1986 


LY24-5221 


CMS Data Areas and Control Block Logic 215 








OPSECT 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


DISP NAME LEN KEY DESCRIPTION 

2B5 LRDPFLG2 1 03610 EDIT OPTIONS — BYTE 2 

Values Defined in LRDPFLG2 


80 LRDPWAIT WAIT FOR ATTENTION INTERRUPT 

40 LRDPRTRY RETRY IF ATTENTION INTERRUPT 

Values Defined 


26 LRDPLEN LENGTH OF LRDP IN BYTES 

05 LRDPLEND LENGTH OF LRDP IN DOUBLEWORDS 


2B6 2 RESERVED FOR FUTURE USE 

END OF LINERD PLIST 


FIELDS REQUIRED BY LINERD 


2B8 LNENUM 4 

2BC COLNUM 4 

CONSOLE INPUT BUFFER 


LINE NUMBER OF THE DATA READ 
COLUMN NUMBER OF THE DATA READ 


2C0 

2C4 


CONINBLK 4 RESERVED FOR FUTURE 

CONINCDE 1 03611 FLAGS AND COMMAND CODE 


Values Defined in CONINCDE 


OA CONRD 
OE CONRDINV 

40 CONATTN 
09 CONWRCR 
01 CONWRNCR 
FF CBUFMAX 


READ COMMAND CODE 

SPECIAL READ COMMAND CODE, TO INHIBIT 

DISPLAY OF DATA READ 

ATTENTION READ 

WRITE WITH CARRIAGE RETURN 

WRITE WITH NO CARRIAGE RETURN 

MAXIMUM CONSOLE READ LENGTH 


2C5 CONINLEN 1 03612 LENGTH TO BE READ FROM CONSOLE 


2C6 CONINBUF 255 INPUT LINE 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AFST 

001C .. 

CONLINLEN 

2C5 


CONWRITE 

0074 

, , 

EXQ0LD2 

0180 


CBUFMAX 

02C4 .. 

CONRD 

02C4 

OA 

| CONWRNCR 

02C4 

01 

EXQ0LD13 

01AC 


CLOSIO 

010C .. 

CONRDINV 

02C4 

OE 

EXADD 

015C 


EXQSAVE 

0170 


CLOSIODV 

0114 .. 

CONPCCW 

0098 


EXF1 

0154 


EXQTYPE 

01C0 


CMSNAME 

004C .. 

CONQSAVE 

01E0 


EXGLOBAL 

0160 


EXQWORK 

0170 


CMSOP 

0000 .. 

CONRDBUF 

0060 


EXLEVEL 

0150 


FCBIO 

0168 


CMSQPLK 

0250 

CONRDCNT 

0066 


EXNUM 

0158 


FILEBUFF 

001C 


COLNUM 

02BC .. 

CONRDCOD 

0064 


EXQCMD 

01B0 


FILEBYTE 

0020 


CONATTN 

02C4 40 

CONREAD 

0058 


EXQEND 

01D0 


FILECOUT 

0030 


CONCCWS 

00A0 .. 

CONWRBUF 

007C 


EXQFLAG 

01D8 


FILEFORM 

0024 


CONINBLK 

02C0 .. 

CONWRCNT 

0082 


EXQFST 

01CC 


FILEITEM 

002C 


CONINBUF 

02C6 

CONWRCOD 

0080 


EXQMODE 

01C8 


FILEMODE 

0018 


CONINCDE 

02C4 .. | 

| CONWRCR 

02C4 

09 

EXQNAME 

01B8 


FILENAME 

0008 
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CROSS REFERENCE (Name Disp Value) 


FILEREAD 

0028 


LRDPTRUP 

02B4 

01 

PUNBUFF 

00C8 

9 9 

QPLQYFLG 

0230 

02 

FILERPTR 

0038 


LRDPVSNM 

02A0 

9 9 

PUNCHLST 

OOCO 

9 9 

QPLST 

0228 

• • 

FILETYPE 

0010 


LRDPNAIT 

02B5 

80 

PUNCOUNT 

OOCC 

• • 

QPLXADDR 

023C 

• • 

FILEWPTR 

0034 


0SI0TYPE 

016C 

, , 

QCLFLAG 

025C 

80 

QPLXAFLG 

0230 

10 

IOAREA 

001C 


PLIST 

0000 

. # 

QCNAME 

0260 

9 9 

QPSTLEN 

0248 

24 

IOLENGTH 

0020 


POINTERS 

002C 


QCNCFLAG 

025C 

20 

QXADDR 

0268 

9 9 

LNENUM 

02B8 


PRBUF 

00D8 

. . 

QCNFLAG 

025C 

40 

QXAFLAG 

025C 

10 

LRDP 

0290 


PRCC 

00E1 


QFLAGS 

025C 

9 9 

RDBUFF 

00B8 


LRDPCOL 

02A8 


PRCCINP 

00E0 

*04 

QMCQUNT 

0270 

9 9 

RDCCN 

OOBC 


LRDPDATA 

0298 


PRCCW 

00E4 

, . 

QMHEAD 

0274 

9 9 

RDCOUNT 

OOBE 


LRDPDATL 

029C 


PRCMSDEV 

00E0 

02 

QMLFLAG 

025C 

08 

READLST 

00B0 


LRDPDRCT 

02B4 

20 

PRCNT 

00E8 

9 9 

QMLIMIT 

026C 

• • 

SAVEBYTE 

01D9 


LRDPFLG1 

02B4 


PRDEVC 

00E2 


QMTAIL 

0278 

9 9 

SAVERO 

0044 


LRDPFLG2 

02B5 


PRDEVT 

00E3 


QNAME 

0254 

9 9 

SAVERl 

0048 


LRDPLEN 

02B5 

26 

PRFLGS1 

OODD 


QNXTBLK 

0250 

9 9 

SAVER14 

003C 


LRDPLEND 

02B5 

05 

PRFGLS2 

00E0 

9 9 

QPLCCFLG 

0230 

20 

SAVER15 

0040 


LRDPLGCL 

02B4 

04 

PRF0RM 

00E0 

01 

QPLCLFLG 

0230 

80 

TAPEBUFF 

0101 


LRDPLINE 

02A4 

. # 

PRINTEND 

0 0 EC 

, , 

QPLCNAME 

0234 

# , 

TAPECOUT 

0108 


LRDPMASK 

02B4 

10 

PRINTLST 

00D0 


QPLCNFLG 

0230 

40 

TAPEDEV 

OOFC 


LRDPPAD 

02B4 

80 

PRLEN 

OODE 

, . 

QPLMDFLG 

0230 

04 

TAPELIST 

00 EC 


LRDPPADC 

02B4 

40 

PRNOASA 

OODD 

01 

QPLMLFLG 

0230 

08 

TAPEMASK 

0100 


LRDPPBUF 

02AC 

9 m 

PRTRC 

0 ODC 

, , 

QPLMLIM 

0240 


TAPEOPER 

00F4 


LRDPPLEN 

02B0 

9 9 

PRTRCIND 

OODD 

02 

QPLMSGAD 

0244 


TAPESIZE 

0104 


LRDPRTRY 

02B5 

40 

PRTRCINP 

OODD 

04 

QPLMSGLN 

0248 


WAITDEV 

008C 


LRDPSTCK 

02B4 

08 

PRXPL1ST 

OODD 

80 

QPLNAME 

0228 


WAITLIST 

006C 


LRDPSVCN 

LRDPTRNS 

0290 

02B4 

02 

PR3800 

OODD 

08 

QPLOPTNS 

0230 


WAITLST 

0084 
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OSFST: OS FILE STATUS TABLE 

OSFST describes the fields of an OS file status table. When an OS disk is accessed, 
DMSROS obtains storage from CMS free storage, builds and fills in an OSFST block, 
which is comparable to a CMS FST block. This block is released by DMSALU. OSFST is 
invoked via the OSFST macro. 


0 

OSFSTFM j ///////// 

0SFSTBLK 

OSFSTFVF 

8 

OSFSTLRL 

A*1 | /// 

A*2 | A*3 

10 

OSFSTNXT 

OSFSTCHR | 

18 

cont.j 0SFSTEND 


20 





OSFSTDSN 


48 

50 

F0 

F8 

100 

108 

110 


j 


OSFSTXTN 

OSFSTDSK I OSFSTTYP 


J OSFSTDSK J 


I 


OSFSTNTE 


0SFSTTRK 


OSFSTMEM 


OSFSTMEM Ccont.) 


SIZE 

OSFST LENGTH IN DOUBLEWORDS COSFSTLTH) 23 
HEX 


PISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

OSFSTFM 

2 

DISK MODE 

2 


2 

RESERVED 

4 

OSFSTBLK 

2 

BL0CKSIZE 

6 

OSFSTFVF 

2 

FIXED/VARIABLE FLAG 

8 

OSFSTLRL 

4 

LOGICAL RECORD SIZE 

C 

0SFSTRFM 

1 AX1 

OS RECORD FORMAT 

D 


1 

RESERVED 
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PISP 

NAME 

LEN KEY 

DESCRIPTION 

E 

OSFSTFLG 

1 A*2 

FLAG BYTE 

Values Defined in OSFSTFLG 

80 

OSFSTALT 


ALTERNATE TRACK INDICATOR 

40 

OSFSTDBK 


BLOCKSIZE NOT SPECIFIED IN DSCB 

08 

OSFSTMVL 


MULTIPLE VOLUME DATA SET 

02 

OSFSTUMV 


UNMOVEABLE DATA SET 

01 

OSFSTRSW 


INDICATES POINT+1 JUST ISSUED 

F 

OSFSTXNO 

1 AX3 

NUMBER OF DATA EXTENTS ON DISK 

10 

OSFSTNXT 

4 

NEXT OS FST 

14 

OSFSTCHR 

5 

CCHHR OF LAST I/O OPERATION 

19 

OSFSTEND 

5 

CURRENT EXTENT END 

IE 

OSFSTDSN 

44 

DATA SET NAME 

4A 

OSFSTXTN 

170 

DATA EXTENTS DESCRIPTION 

68 

0SFSTEX4 


LOCATION OF 4TH EXTENT FROM DSCB3 

F4 

OSFSTDSK 

2 

DISK ADDRESS (0CUU) 

F6 

OSFSTTYP 

2 

DISK DEVICE TYPE (SEE OSADT FOR TYPE FLAGS) 

F8 

OSFSTNTE 

5 

USED TO SAVE CCHHR FOR NOTE MACRO 

FD 


3 

RESERVED 

100 

OSFSTTRK 

4 

NUMBER TRACKS PER CYLINDER 

104 


8 

RESERVED 

10C 

OSFSTMEM 

8 

PARTITIONED DATA SET MEMBER NAME 

CROSS 

REFERENCE 

: (Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


OSFSTALT 000E 80 
OSFSTBLK 0004 . . 
OSFSTCHR 0014 .. 
OSFSTDBK 000E 40 
OSFSTDSK 00F4 .. 
OSFSTDSN 001E .. 


OSFSTEND 0019 . . 
0SFSTEX4 004A 68 
OSFSTFLG 000E .. 
OSFSTFM 0000 .. 
OSFSTFVF 0006 . . 
OSFSTLRL 0008 . . 


OSFSTLTH 

• • • • 

23 

OSFSTMEM 

010C 

• • 

OSFSTMVL 

OOOE 

08 

OSFSTNTE 

OOF8 

9 # 

OSFSTNXT 

0010 

* # 

OSFSTRFM 

OOOC 

# . 


OSFSTRSW 000E 01 
OSFSTTRK 0100 .. 
OSFSTTYP 00F6 . . 
OSFSTUMV 000E 02 
OSFSTXNO 000F .. 
OSFSTXTN 004A . . 
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OVSECTs DESCRIPTION OF THE FIRST FEW LOCATIONS OF DMSOVS 

OVSECT is used by module DMSOVS to provide trace information requested by SVCTRACE. 
OVSECT is invoked by the OVSECT macro. 


OVSGO 

AERR 

AMGM 

AWAIT 

LEONOVS 



HEX 

DISP NAME LEN KEY DESCRIPTION 


0 OVSGO 
4 AERR 
1 8 AMGM 

C AWAIT 
10 LENOVS 


4 BRANCH TO THIS POINT FOR TRACE 

4 ADDRESS OF DMSERR 

4 ADDRESS OF DMSMGM 

4 ADDRESS OF CONWAIT 

4 DMSOVS LENGTH IN DOUBLEWORDS 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

AERR 0004 .. AWAIT 000C .. LENOVS 0010 .. 

| AMGM 0008 OVSGO 0000 .. 
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PARMLIST 


PARMLIST: PROP ACTION ROUTINE PARAMETER LIST 

PARMLIST is used as a template to describe the parameter list which is passed by 
programmable operator facility to the action routine. Each fullword points to an 
element of parameter data. PARMLIST is found in PROP copy. 


0 

PARMMSG 

PARMMLN 

8 

PARMMSGT 

PARMNETM 

10 

PARMRUSR 

PARMRNOD 

18 

PARMPUSR 

PARMPNOD 

20 

PARMOUSR 

PARMONOD 

28 

PARMRTFI 

PARMRTPM 

30 

PARMMTYP 

PARMARTN 

38 

PARMEND 



SIZE 

PARMLIST SIZE IN DOUBLEWORDS (PARMSIZE) 08 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 

PARMMSG 

4 

ORIGINAL MESSAGE TEXT 

4 

PARMMLN 

4 

LENGTH 

OF 

MESSAGE TEXT 

8 

PARMMSGT 

4 

TEXT IN 

8- 

-BYTE TOKENS 

C 

PARMNETM 

4 

USERID 

OF 

RSCS NET MACHINE 

10 

PARMRUSR 

4 

USERID 

OF 

REQUESTING USER 

14 

PARMRNOD 

4 

NODEID 

OF 

REQUESTING USER 

18 

PARMPUSR 

4 

USERID 

OF 

PROP 

1C 

PARMPNOD 

4 

NODEID 

OF 

PROP 

20 

PARMOUSR 

4 

USERID 

OF 

LOGICAL OPERATOR 

24 

PARMONOD 

4 

NODEID 

OF 

LOGICAL OPERATOR 

28 

PARMRTFI 

4 

CURRENT 

ROUTING TABLE FILEID 

2C 

PARMRTPM 

4 

PARAMETER 

FROM ROUTING TABLE 

30 

PARMMTYP 

4 

MESSAGE 

TYPE CODE 

34 

PARMARTN 

4 

ACTION 

ROUTINE ADDRESS 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

38 

PARMEND 

4 

PARM LIST END INDICATOR 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


PARMARTN 0034 .. 
PARMEND 0038 .. 
PARMMLN 0004 .. 
PARMMSG 0000 . . 


PARMMSGT 0008 . . 
PARMMTYP 0030 . . 
PARMNETM 000C . . 
PARMONOD 0024 . . 


PARMOUSR 0020 .. 
PARMPNOD 001C .. 
PARMPUSR 0018 . . 
PARMRNOD 0014 .. 


PARMRTFI 0028 .. 
PARMRTPM 002C .. 
PARMRUSR 0010 , . 
PARMSIZE .... 08 
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PARSERCB 


PARSERCB: PARSER CONTROL BLOCK 

The PARSERCB contains the following daga areas and addresses for arguments specified 
on the PARSECMD Macro, and provides back the addresses of the results of the parsing 
facility. 


0 
8 

10 
18 
20 
28 

38 
40 

SIZE 

LENGTH OF PARSERCB IN BYTES CPARLENBY) 40 
LENGTH OF PARSERCB IN DHORDS (PARLENDW) 8 


PARNAME 

PARTOKIN 

PARTOKPT 

PAREPLIN 

PAREPLPT 

F*1 |f*2 )f*3 

F*4 

PARPVCAD 

j PARPVCNM 

PARMSGAD 

PARUNQID 

PARAPLID 

RESERVED 


HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 



0 

PARNAME 

8 


PARSER ENTRY POINT 'DMSPAR' 



8 

PARTOKIN 

4 


INPUT TOKENIZED PLIST ADDRESS 



C 

PARTOKPT 

4 


PARSED (TRANSLATED) TOKENIZED 

PLIST 

ADDRESS 

10 

PAREPLIN 

4 


INPUT EXTENDED PLIST ADDRESS 



14 

PAREPLPT 

4 


PARSED (TRANSLATED) EXTENDED 

PLIST 

ADDRESS 

18 

PARPTYPE 

1 

FX1 

PLIST TYPE - HIGH ORDER BYTE 

OF R1 


19 

PARTRANS 

1 

F*2 

TRANSLATION FLAG 




Values Defined in PARTRANS 


80 PARTRYES 
40 PARTRNO 
20 PARTRSAM 
10 PARSFLG 


TRANSLATION = YES (NATIONAL LANG) 
TRANSLATION = NO (SYSTEM LANG) 
TRANSLATION = SAME (SYSTEM = NATIONAL) 
PARSFLG SPECIFIED 


1A PARMSG 1 F*3 MESSAGE DISPOSITION 


Values Defined in PARMSG 


00 PARMSGER 
04 PARMSGXC 
02 PARMSGNO 


MESSAGE DISPOSITION ERRMSG 
MESSAGE DISPOSITION EXEC0MM 
MESSAGE DISPOSITION NONE 


| IB 1 FX4 RESERVED 

| 1C PARPVCAD 4 PVC TABLE ADDRESS 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 


| 20 

PARPVCNM 

4 

NUMBER OF ENTRIES IN PVC 

TABLE 

*■ 

CM 

PARMSGAD 

4 

MESSAGE BUFFER ADDRESS 


00 

CM 

PARUNQID 

16 

SYNTAX DEFINITION UNIQUE 

ID 

| 38 

PARAPLID 

3 

APPLICATION IDENTIFIER 


1 CROSS 

REFERENCE 

(Name 

Disp Value) 



This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PARPTYPE 0018 .. PARTRANS 0019 
PARPVCAD 001C .. PARTRNO 0019 
PARPVCNM 0020 .. PARTRSAM 0019 
PARSFLG 0019 10 PARTRYES 0019 
PARTOKIN 0008 .. PARUNQID 0028 
PARTOKPT 000C .. 


PARAPLID 0038 .. PARMSG 001A 

PAREPLIN 0010 .. PARMSGAD 0024 .. 

PAREPLPT 0014 .. PARMSGER 001A 00 

PARINVMD 001B 80 PARMSGN0 001A 02 

PARLENBY .... 40 PARMSGXC 001A 04 

PARLENDW_ 8 PARNAME 0000 .. 


40 

20 

80 
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PARSERUF 


PARSERUF: PARSER USER FUNCTION PARAMETER BLOCK 

The PARSERUF generates a mapping for the User Token Validation Function Parameter 
Control Block. 

0 
8 

10 
18 


SIZE 

Length in bytes of this block CPARUSZBY) 20 
Length in DWORDS of this block (PARUSZDW) 4 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 PARUNAME 8 Name of function 

8 PARUTKAD 4 Address of token 

C PARUTKLG 4 Length of token 

| 10 PARUPVC 1 User Function Validation Code 

I 18 PARUFNCE 8 RESERVED 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PARUFNCE 0018 .. | PARUPVC 0010 .. | PARUSZBY _ 20 PARUSZDW _ 4 

PARUNAME 0000 .. PARUTKAD 0008 .. 

PARUTKLG 000C .. 


( 
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PDSSECT? DIRECTORY TABLE FOR BPAM SIMULATION 


PDSSECT describes the fields of the in-storage directory that is used in OS 
simulation of BPAM. The in-storage directory is built dynamically by DMSSVT from 
CMS free storage. PDSSECT is invoked via the PDSSECT macro. 


0 

PDSIDENT 

P*1 P*2 

8 

PDSDIRSZ 

PDSDIRIT 

10 

PDSENTSZ 

DIRNAME 

18 

(cont.) 

DIRPTR 

PX3 | P*4 

CORESIZE | 

20 

PDSBLKSI 

PX5 |///// 

PDSDIR 


SIZE 

MACLIB/PDS HEADER SIZE IN BYTES (PDSHDRSZ) 10 
PDSSECT HEADER LENGTH IN BYTES (PDSLEN) 24 

HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

PDSIDENT 

6 


MACLIB/PDS IDENTIFIER 

D7 

PDSFNEW 



CHECK PDSIDENT+3, OLD VS NEW 

6 

PDSFLG1 

1 

PXl 

MACLIB/PDS FLAG1 

5B 

PDSTEMPF 



PDS DIRECTORY IS IN $PDSTEMP FILE 

7 

PDSFLG2 

1 

PX2 

MACLIB/PDS FLAG2 

8 

PDSDIRSZ 

4 


MACLIB/PDS DIRECTORY SIZE 

C 

PDSDIRIT 

4 


MACLIB/PDS DIRECTORY ITEM NUMBER 

10 

PDSENTSZ 

4 


PDS ENTRY SIZE 

14 

DIRNAME 

6 


MACLIB IDENTIFIER 

1A 

DIRPTR 

2 


ITEM POINTER TO START OF DIRECTORY 

1C 

TEMPBYTE 

1 

PX3 

IF $ , THEN PDS IS IN $PDSTEMP FILE 

ID 

NEWBLKS 

1 

P*4 

NUMBER NEW BLKS ADDED TO PDS BY STOW 

IE 

CORESIZE 

2 


SIZE OF DICTIONARY IN BYTES 

20 

PDSBLKSI 

2 


BLOCKSIZE OF DICTIONARY 

22 

CHNGBYTE 

1 

PX5 

INDICATES UPDATES TO DICTIONARY 

23 


1 


RESERVED 

24 

PDSDIR 

0 


START OF IN CORE DICTIONARY 
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CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CHNGBYTE 0022 . 
CORESIZE 001E . 
DIRNAME 0014 . 
DIRPTR 001A . 
NEHBLKS 001D . 


PDSBLKSI 0020 . 
PDSDIR 0024 . 
PDSDIRIT 000C . 
PDSDIRSZ 0008 . 
PDSENTSZ 0010 . 


PDSFLG1 0006 .. 
PDSFLG2 0007 .. 
PDSFNEW 0000 D7 
PDSHDRSZ .... 10 


PDSIDENT 0000 
PDSLEN .... 
PDSTEMPF 0006 
TEMPBYTE 001C 
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PGMSECT: PROGRAM INTERRUPT WORK AREA 

PGMSECT describes the fields used by DMSITP for saving registers, old PSW, and other 
data for handling program interrupts. 

The PGMSECT CSECT is pointed to by the APGMSECT field in NUCON. PGMSECT is invoked 
by the PGMSECT macro. 




HEX 

DISP NAME LEN KEY DESCRIPTION 

0 DEBPSW 4 POINT TO DEBUG 

4 4 RESERVED 

8 PIE 32 XXXPROGRAM INTERRUPT ELEMENT*** 

8 PICADDR 4 PICA ADDRESS FROM RECENT "SPIE" 

C OPSW 8 OLD PSW AFTER PROGRAM INTERRUPT 

14 20 REGS: R14, R15, R0, Rl, R2 

XXXEND PROGRAM INTERRUPT ELEMENT*** 

28 TEMPOLD 8 WORK AREA 

30 TEMPNEW 8 WORK AREA 

38 R13AREA 4 SAVED R13 

3C PSAVE 64 REGS SAVED AT INTERRUPT TIME 
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PGMSECT 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

7C 

SCBPTR 

4 


POINTER TO FIRST STAE CONTROL BLOCK 


Values Defined in SCBPTR 

80 STAEBIT 
40 STAIBIT 
20 RETRYBIT 


80 

SCBHORK 

4 

ADDRESS 

OF 

WORK 

AREA FOR STAE EXIT ROUTINE 

84 

SCBSAV12 

4 

ADDRESS 

OF 

REG 

12 

SAVE 

AREA 

FOR 

DMSSAB 

88 

SCBSAV13 

4 

ADDRESS 

OF 

REG 

13 

SAVE 

AREA 

FOR 

DMSSAB 

8C 

SCBSAV14 

4 

ADDRESS 

OF 

REG 

14 

SAVE 

AREA 

FOR 

DMSSAB 

90 

AUPIE 

4 

ADDRESS 

OF 

USER 

'S 

PIE, 

IN SPIE 

EXIT 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


AUPIE 

0090 .. 

PSAVE 

003C .. 

SCBSAV12 0084 .. 

STAEBIT 

007C 

80 

DEBPSW 

0000 .. 

RETRYBIT 

007C 20 

SCBSAV13 0088 .. 

STAIBIT 

007C 

40 

OPSH 

000C . . 

R13AREA 

0038 .. 

SCBSAV14 008C .. 

TEMPNEW 

0030 

, # 

PICADDR 

PIE 

0008 .. 

0008 . . 

SCBPTR 

007C .. 

SCBHORK 0080 .. 

TEMPOLD 

0028 

• * 
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PIBADR: PROGRAM INFORMATION BLOCK 

PIBADR contains a save area address and interrupt information. PIBADR is invoked by 
the PIBTAB macro and is often referred to by this macro name. The PIBPT field in 
the BGCOM block points to the PIBTAB CSECT. 


A*1 

A*2 

PIBLOGID 

PIBSAVE 

PIBSAV2 

A*3 

AX4 

AX5 

A*6 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PIBFLG 

1 

AX1 

FLAGS 

1 

PIBCNCL 

1 

AX2 

CANCEL CODE 

2 

PIBLOGID 

2 


SYSLOG ID 

4 

PIBSAVE 

4 


ADDRESS OF SAVE AREA 

8 

ARFLG 



SAVE AREA ADDRESS 

8 

PIBSAV2 

4 


ADDRESS OF SYSTEM SAVE AREA 

C 

PIBPUBAS 

1 

A*3 

PUB ASSIGN FLAGS 


D 

PIBLUBID 

1 AX4 

LUB NUMBER OF FIRST PROBLEM PROGRAM LUB 

E 

PIBLUBNO 

1 A*5 

NUMBER OF LUBS 

F 

PIBFLG2 

1 A*6 

MORE FLAGS 

PIBTAB 

\ EXTENSION 



0 

PIBCOMRA 

2 

COMMUNICATIONS REGION ADDRESS 

2 

SYSLUBX 

2 

SYSTEM CLASS LUB INDEX 

4 

PIBMTID 

2 

TID OF MAINTASK 

6 


2 

RESERVED 

8 

APCB 

4 

PCB POINTER 

C 

PIBPIK 

2 

PIK OF PARTITION 

E 


2 

RESERVED 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


APCB 0008 .. 
ARFLG 0008 .. 
PIBCNCL 0001 .. 
PIBCOMRA 0000 . . 


PIBFLG 0000 .. 
PIBFLG2 000F .. 
PIBL0GID 0002 . . 
PIBLUBID 000D .. 


PIBLUBNO 000E .. 
PIBMTID 0004 .. 
PIBPIK 000C .. 
PIBPUBAS 000C .. 


PIBSAVE 0004 . 
PIBSAV2 0008 . 
SYSLUBX 0002 . 
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PIB2TAB: PROGRAM INFORMATION BLOCK EXTENSION 

PIB2TAB describes the entries in the PIB2TAB block/ which is an extension of the 
PIBTAB block. For each PIB table entry, an entry exists in the PIB table extension 
block (PIB2TAB). PIB2TAB is invoked via the PIB2TAB macro. 

The PIB2PTR field in the BGCOM block points to the PIB2TAB block. 


PIBC0MR1 

SYSLUBX 

INTINFO 

PIBECB 

PIBPIK 

////////// 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PIBC0MR1 

2 

ADDRESS OF COMMUNICATION REGION 

2 

SYSLUBX 

2 

SYSTEM LUB INDEX 

4 

INTINFO 

4 

USED FOR INTERRUPTION CODE 

7 

SVCIC 


SVC INTERRUPT CODE 

8 

PIBECB 

4 

ADDRESS OF TERMINATION ECB, IF 

C 

PIBPIK 

2 

PIK 

E 


2 

RESERVED 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

INTINFO 0004 .. PIBECB 0008 .. PIBPIK 000C .. SVCIC 0007 .. 
PIBC0MR1 0000 .. SYSLUBX 0002 .. 
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PMXMBLOK 


PMXMBLOK: PMX MESSAGE BLOCK 

PMXMBLOK is used as a template to describe a message targeted for the PMX. 
is found in PROP copy. 


0 

8 

10 

18 

100 



SIZE 

PMXMBLOK PMX MESSAGE BLOK LENGTH IN BYTES (PMXMBLEN) 100 
PMX MESSAGE BLOCK SIZE IN DOUBLEWORDS CPMXMSIZE) 20 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PMXMNEXT 

4 

ADDRESS OF NEXT MSG BLOK 

4 

PMXMLEN 

2 

LENGTH OF MESSAGE (OPID + TEXT) 

6 

PMXMFLAG 

1 Pxi 

PMX MSG BLOK FLAG BYTE 

Values Defined in PMXMFLAG 

80 

PMXMRESP 


INDICATES MSG IS A RESPONSE 

7 

PMXMTYPE 

1 PX2 

MESSAGE TYPE 

8 


8 

RESERVED 

10 

PMXMMSG 

240 

PMX MESSAGE FIELD 

10 

PMXMOPID 

8 

TARGET NCCF OPERATOR ID 

18 

PMXMTEXT 

232 

MESSAGE TEXT 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PMXMBLEN .... XX PMXMLEN 0004 PMXMRESP 0006 80 PMXMTEXT 0018 

PMXMNEXT 0000 PMXMMSG 0010 PMXMSIZE .... 20 PMXMTYPE 0007 

PMXMFLAG 0006 PMXM0PID 0010 
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PROPCQM: PROP COMMUNICATION AREA 

PROPCOM describes the contents of the area defined in DMSPOP to allow the 
communication of flags and other data between the main programmable operator 
facility module, DMSPOP, and the action routine module, DMSPOR. PROPCOM is found in 
PROP copy. 


0 

PC0ML0GF 

PCOMSTBL 

8 

PCOMETBL 

PC0MTSIZ 

10 

PCOMRDIN 

PCOMLDMD 

18 

PCOMRSET 

PCOMRSTL 

20 

PCOMLMSG 

J VXl | V*2 

28 

PCOMUTBL 

PCOMSTRC 

30 

PCOMSTPC 

PCOMNLST 

38 

PCOMTODI 

PCOMPREP 

40 

PCOMFNOD 

PC0MABNE 

48 

PCOMEXIT 

PCOMFNDN 

50 

PCOMTOKN 

PC0MT0DP 

58 

PC0MSD0P 

/////////////// 

60 

PCOMSDQF 

PC0MSDQL 

68 

PCOMDLOU 

70 

PCOMDLON 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

PCOMLOGF 

4 

ADDRESS OF LOG FILE FSCB 

4 

PCOMSTBL 

4 

START OF ROUTING TABLE 

8 

PCOMETBL 

4 

END OF ROUTING TABLE 

C 

PCOMTSIZ 

4 

ROUTING TABLE SIZE 

10 

PCOMRDIN 

4 

ADDRESS OF READIN ROUTINE 

14 

PCOMLDMD 

4 

ADDRESS OF LOADNUCX ROUTINE 

18 

PCOMRSET 

4 

ADDRESS OF CP SET COMMANDS TO RESET 

1C 

PCOMRSTL 

4 

LENGTH OF CP SET COMMANDS TO RESET 

20 

PCOMLMSG 

6 

MESSAGE FORMAT FOR LOCAL MESSAGES 
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PROPCOM 


DISP NAME LEN KEY DESCRIPTION 

26 PCOMFLAG 1 V*1 PROP FLAGS 


Values Defined in PCOMFLAG 


80 PCOMSTOP 
40 PCOMKILL 
20 PCOMLOG 
10 PCOMABNA 
08 PCOMLOGA 
04 PCOMSPHC 
02 PCOMPMRS 
01 


STOP THE PROP APPLICATION 
IMMEDIATE STOP 
INDICATES LOGGING IS ON 
INDICATES ABEND IS ACT RTN 
INDICATES LOGGING "ALL" 

HOST CHECKING SUSPENDED FLAG 
PROP/PMX CONNECT SEVERED FLAG 
RESERVED 


27 PC0MFLG2 1 V*2 SECOND PROP FLAG BYTE 


Values Defined in PC0MFLG2 





80 PCOMPMCN 
40 PCOMPMSV 
20 
10 
08 
04 
02 
01 


28 

PCOMUTBL 

4 

2C 

PCOMSTRC 

4 

30 

PCOMSTPC 

4 

34 

PCOMNLST 

4 

38 

PCOMTODI 

4 

3C 

PCOMPREP 

4 

40 

PCOMFNOD 

4 

44 

PCOMABNE 

4 

48 

PCOMEXIT 

4 

4C 

PCOMFNDN 

4 

50 

PCOMTOKN 

4 

54 

PCOMTODP 

4 

58 

5C 

PCOMTODP 

4 

4 

60 

PCOMSDQF 

4 

64 

PCOMSDQL 

4 

68 

PCOMDLOU 

8 

70 

PCOMDLON 

8 


PMX CONNECTION ESTABLISHED 

PMX SEVERED CONNECTION 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

ADDRESS OF START OF USER'S PART OF THE ROUTING TABLE 
ADDRESS OF STARTCHK ROUTINE 
ADDRESS OF STOPCHK ROUTINE 
ANCHOR ADDRESS FOR NODE LIST 


ADDRESS 

OF 

TODISK ROUTINE 

ADDRESS 

OF 

BUFPREP 1 

ROUTINE 

ADDRESS 

OF 

FRETNODE 

ROUTINE 

ADDRESS 

OF 

ABEND EXIT 

ADDRESS 

OF 

CALLEXIT 

ROUTINE 

ADDRESS 

OF 

FINDNODE 

ROUTINE 

ADDRESS 

OF 

TOKENIZE 

ROUTINE 


PARMLIST FOR SPECIAL LOGGING 
ADDRESS OF SDLGLOPR ROUTINE 
RESERVED 

ADDRESS OF FIRST IN SEND QUEUE 
ADDRESS OF LAST IN SEND QUEUE 
DEFAULT LGLOPR USERID 
DEFAULT LGLOPR NODEID 
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CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


PCOMABNA 0026 10 
PCOMABNE 0044 . . 
PCOMDLON 0070 .. 
PCOMDLOU 0068 . . 
PCOMETBL 0008 . . 
PCOMEXIT 0048 . . 
PCOMFLAG 0026 . . 
PC0MFLG2 0027 . . 
PCOMFNDN 004C .. 
PCOMFNOD 0040 .. 


PCOMKILL 0026 40 
PCOMLDMD 0014 .. 
PC0MLMSG 0020 .. 
PCOMLOG 0026 20 
PC0ML0GA 0026 8 
PCOMLOGF 0000 .. 
PCOMNLST 0034 .. 
PCOMPMCN 0027 80 
PCOMPMRS 0026 02 


PCOMPMSV 0027 40 
PCOMPREP 003C .. 
PCOMRDIN 0010 .. 
PCPMSDQP 0058 .. 
PCOMSDQF 0060 .. 
PCOMSDQL 0064 . . 
PCOMSPHC 0026 04 
PC0MRSET 0018 . . 
PCOMRSTL 001C .. 


PCOMSTBL 

0004 

• • 

PCOMSTOP 

0026 

80 

PCOMSTPC 

0030 


PCOMSTRC 

002C 


PCOMTODI 

0038 


PCOMTODP 

0054 


PCOMTOKN 

0050 


PCOMTSIZ 

oooc 


PCOMUTBL 

0028 
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PROPTAB 


PROPTAB: ROUTING TABLE FILE ENTRY 

PROPTAB is used as a template to describe an entry (i.e. a record) in the 
programmable operator facility routing table file. PROPTAB is found in PROP copy. 

SIZE 

LENGTH OF AN ENTRY IN FILE CPROPLEN ) 48 
HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

TEXT 

25 

MESSAGE COMPARISON TEXT 

19 


1 

SPACER 

1A 

SCOL 

3 

STARTING COLUMN FOR MESSAGE SCAN 

ID 


1 

SPACER 

IE 

ECOL 

3 

ENDING COLUMN FOR MESSAGE SCAN 

21 


1 

SPACER 

22 

MSGT 

2 

IUCV MESSAGE TYPE 

24 


1 

SPACER 

25 

USERID 

8 

AUTHORIZED USER f S USERID 

2D 


1 

SPACER 

2E 

NODEID 

8 

AUTHORIZED USER'S NODEID 

36 


1 

SPACER 

37 

ACTION 

8 

NAME OF ACTION ROUTINE TO INVOkE 

3F 


1 

SPACER 

40 

ACTRPARM 

8 

PARAMETER TO ACTION ROUTINE 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

ACTION 0037 .. MSGT 0022 .. PROPLEN _48 TEXT 0000 .. 

ACTRPARM 0040 .. NODEID 002E .. SC0L 001A .. USERID 0025 .. 
ECOL 001E .. 
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PUBADR: PHYSICAL UNIT BLOCK TABLE 

PUBADR defines the fields of a physical unit block table as used by CMS and/or VSE 
routines. Both DSECTs define the same storage. 

• For use by the CMS Routines CMAPPUB macro) 

The simulated PUBADR DSECT has eighteen 8-byte entries, one for each device 
supported by CMS. The simulated PUBADR DSECT is invoked by the MAPPUB macro. 


PUBCUU 

/// 

A*1 

A*2 

AX3 

AX4 

AX5 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PUBCUU 

2 

CHANNEL AND DEVICE NUMBER 

2 


1 

RESERVED 

3 

PUBDSKM 

1 AX1 

DISK MODE IF ASSIGNED DASD 

4 

PUBDEVT 

1 A*2 

DEVICE TYPE CODE 

5 

PUBIAPM1 

1 A*3 

CMS TAPE SET MODE ATTRIBUTES 

6 

PUBTAPM2 

1 A*4 

DOS TAPE SET MODE ATTRIBUTES 

7 

PUBTAP7 

1 A*5 

SEVEN TRACK INDICATOR 

CROSS 

REFERENCE 

(Name 

Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PUBADR 0000 .. PUBDEVT 0004 .. PUBDSKM 0003 PUBTAPM1 0005 .. 

PUBCUU 0000 .. PUBTAPM2 0006 .. 

PUBTAP7 0007 .. 
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PUBADR 


CROSS REFERENCE (Name Disp Value) 

• For use by the DOS/VS Routines (PUBTAB macro) 

The PUBADR DSECT is invoked by the PUBTAB macro. The address of PUBTAB is at 
displacement X f 40* of BGCOM. 


PUBCHANN 

A*1 

AX2 

A*3 

AX4 

A*5 

A*6 

A*7 



SIZE 

PUB TABLE LENGTH IN BYTES CPUBNIT) 09 
HEX 


MSP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PUBCHANN 

2 


CHANNEL AND DEVICE NUMBER 

2 

PUBCHQPT 

1 

A*1 

CHQ. NUMBER OF FIRST REQUEST FOR PUB 

3 

PUBERR 

1 

A*2 

ERROR RETRY COUNTER OR TEB POINTER 

4 

PUBDEVTY 

1 

AX3 

DEVICE TYPE CODE 

5 

PUBOPTN 

1 

A*4 

SET MODE COMMAND OR OTHER OPTIONS 

6 

PUBCSFLG 

1 

AX5 

CHANNEL SCHEDULER FLAGS 

7 

PUBJCFLG 

1 

A*6 

JOB CONTROL FLAGS 

8 

NEXTPUB 

1 

A*7 

FIRST BYTE OF NEXT PUB ENTRY 


Values Defined in NEXTPUB 

08 PUBPTR POINTER TO ORIGINAL PUB 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


NEXTPUB 0008 .. 
PUBCHANN 0000 .. 
PUBCHQPT 0002 . . 


PUBCSFLG 0006 . . 
PUBDEVTY 0004 . . 
PUBERR 0003 .. 


PUBJCFLG 0007 .. 
PUBOPTN 0005 .. 


PUBPTR 0008 08 
PUBWIT .... 09 
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PUBOWNER: PHYSICAL UNIT BLOCK OWNERSHIP TABLE 

PUBOWNER contains a 2-byte entry for each entry in the PUB table. For CMS/DOS, 
there are eighteen 2-byte entries. The address of the PUBOWNER table is in the 
SYSCOM block in the DOSCON CSECT of NUCON. 


PUBOWNER 


20 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 PUBOWNER 68 PUB OWNER 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

PUBOWNER 0000 . . 
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PVCENTRY: PARSER VALIDATION CODE ENTRY 

The Parser Validation Code Table is composed of PARPVCNM contiguous Parser 
Validation Code Entries, one for each token in the Plist. 


PVCNEXTA 

P*l| RESERVED 

PVCTTOKA 

PVCETOKA 

PVCETOKL 



SIZE 

LENGTH OF PVCENTRY IN BYTES (PVCLENBY) 14 

NOTE: VALUES X'19 f -X f 7E f IN PVCCODE ARE RESERVED FOR IBM USE. 

VALUES X*80 1 -X f FF* IN PVCCODE ARE RESERVED FOR CUSTOMER USE. 


HEX 


1 1 L.A 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

PVCNEXTA 

4 

NEXT PVC ENTRY OR 0 IF LAST 

4 

PVCCODE 

1 PX1 

PARSER VALIDATION CODE 

5 


3 

RESERVED 

8 

PVCTTOKA 

4 

TOKENIZED TOKEN ADDRESS 

C 

PVCETOKA 

4 

EXTENDED TOKEN ADDRESS 
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DISP NAME LEN KEY DESCRIPTION 

| 10 PVCETOKL 4 EXTENDED TOKEN LENGTH 

I Values Defined in PVCCODE 


01 PVCCNAME 

COMMAND 

COMMAND NAME 

02 PVCKW0RD 

KEYWORD 

KEYWORD 

03 PVCOPTST 

OPTSTART 

OPTION START ( 

04 PVCOPTEN 

OPTEND 

OPTION END ) 

05 PVCCOMMT 

COMMENT 

COMMENT 

06 PVCALNUM 

ALPHANUM 

ALPHANUMERIC STRING 

07 PVCCHAR 

CHAR 

A SINGLE CHARACTER 

08 PVCCUU 

CUU 

DEVICE ADDRESS? 

09 PVCFN 

FN 

FILENAME 

0A PVCFT 

FT 

FILETYPE 

0B PVCEFN 

EFN 

FILENAME WITH f X» 

0C PVCEFT 

EFT 

FILETYPE WITH 

0D PVCEXECN 

EXECNAME 

EXECNAME 

0E PVCEXECT 

EXECTYPE 

EXECTYPE 

OF PVCFM 

FM 

FILEMODE 

10 PVCHEX 

HEX 

HEXADECIMAL NUMBER 

11 PVCINT 

INTEGER 

INTEGER: 

12 PVCNINT 

NINTEGER 

NEGATIVE INTEGER: 

13 PVCPINT 

PINTEGER 

POSITIVE INTEGER: 

14 PVCMODE 

MODE 

ALPHABETIC CHAR 

15 PVCSTRIN 

STRING 

ANY CHARACTER 

16 PVCTEXT 

TEXT 

ANY STRING 

17 PVCDIGIT 

DIGITS 

ANY UNSIGNED INTEGER 

18 PVCAPPID 

APPLID 

APPLICATION IDENTIFIER 

19 PVCARBMD 

ARBMODIF 


7F PVCINVLD 

INVALID 

UNCONDITIONALLY INVALID 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


PVCNEXTA 

0000 

# # 

PVCALNUM 

0004 

06 

PVCAPPID 

0004 

18 

PVCCHAR 

0004 

07 

PVCCNAME 

0004 

01 

PVCCODE 

0004 


PVCCOMMT 

0004 

05 

PVCCUU 

0004 

08 


PVCDIGIT 

0004 

17 

PVCEFN 

0004 

OB 

PVCEFT 

0004 

OC 

PVCETOKA 

OOOC 


PVCETOKL 

0010 

# # 

PVCEXECN 

0004 

OD 

PVCEXECT 

0004 

OE 

PVCFM 

0004 

OF 


PVCFN 

0004 

09 

PVCFT 

0004 

OA 

PVCHEX 

0004 

10 

PVCINT 

0004 

11 

PVCINVLD 

0004 

7 F 

PVCKWORD 

0004 

02 

PVCLENBY 

• • • • 

10 

PVCMODE 

0004 

14 


PVCNINT 0004 12 

PVCOPTEN 0004 04 

PVCOPTST 0004 03 

PVCPINT 0004 13 

PVCSTRIN 0004 15 

PVCTEXT 0004 16 

PVCTTOKA 0008 . . 
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QEL 


QEL; PROP QUEUED MESSAGE ELEMENT MAPPING 

QEL is used as a template to describe an element in the queue that the programmable 
operator facility keeps in its virtual storage. QEL is found in PROP copy. 



SIZE 

Q ELEMENT SIZE IN DOUBLEWORDS (QELSIZE) 20 
HEX 

DISP NAME LEN KEY DESCRIPTION 

0 QELNEXT 4 ADDRESS OF NEXT Q ELEMENT 

4 QELMLEN 4 LENGTH OF MESSAGE 

8 QELMTYPE 1 V*1 MESSAGE TYPE CODE 

9 7 RESERVED 

10 QELMTEXT 240 MESSAGE TEXT (IUCV FORMAT) 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

QELMLEN 0004 .. QELMTYPE 0008 .. QELNEXT 0000 .. 

QELMTEXT 0010 .. QELSIZE _ 20 
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RTDSECT: INTERNAL ROUTING TABLE ENTRY 

RTDSECT is used as a template to describe an entry in the programmable operator 
facility internal routing table. RTDSECT is found in PROP copy. 


0 

28 

30 

38 

40 

48 


RTEXT 


RUSER 

RNODE 

RACTION 

RACTPARM 


RSTCOL RENDCOL V*1 V*2 V*3 /// 


SIZE 

LENGTH OF A ROUTING TABLE ENTRY (ROUTLEN) 40 


HEX 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

0 

RTEXT 

40 


MESSAGE COMPARISON TEXT 

28 

RUSER 

8 


AUTHORIZED USER'S ID 

30 

RNODE 

8 


AUTHORIZED USER f S NODE 

38 

RACTION 

8 


NAME OF ACTION ROUTINE 

38 

RACTIONB 

4 


ADDRESS OF INTERNAL ACTION ROUTINE 

40 

RACTPARM 

8 


PARAMETER TO ACTION ROUTINE 

48 

RSTRCOL 

2 


STARTING COLUMN FOR MESSAGE SCAN 

4A 

RENDCOL 

2 


ENDING COLUMN FOR MESSAGE SCAN 

4C 

RTYPE 

1 

V*1 

IUCV MESSAGE TYPE 

41) 

RNBRSUB 

1 

V*2 

NUMBER OF TEXT SUBFIELDS 

4E 

RACTFLAG 

1 

V*3 

ACTION ROUTINE FLAGS 


Values Defined in RACTFLAG 


80 RACTBAL 
40 RACTEXEC 
20 
10 
08 
04 
02 
01 


BALR TO ADDRESS IN RACTION FIELD 

THIS ACTION ROUTINE IS AN EXEC 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 

RESERVED 
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DISP NAME LEN KEY DESCRIPTION 

4F 1 RESERVED 


CROSS REFERENCE tName Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


RACTBAL 004E 80 
RACTEXEC 004E 40 
RACTFLAG 004E .. 
RACTION 0038 . . 


RACTIONB 0038 .. 
RACTPARM 0040 . . 
RENDCOL 004A .. 
RNODE 0030 .. 


RNBRSUB 004D .. 
R0UTLEN .... 50 
RSTRCOL 0048 . . 


RTEXT 0000 
RTYPE 004C 
RUSER 0028 


. 1986 


RTDSECT 


LY24-5221 (c) Copyright IBM Corp 


CMS Data Areas and Control Block Logic 245 


RTXSBFLD 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


RTXSBFLD: ROUTING TEXT SUB FIELD 

RTXSBFLD is used in combination with RTDSECT to map over the RTEXT field. RTXSBFLD 
is invoked by itself. 


0 


V*1 


V*2 


RTXSBTXT 


SIZE 

LENGTH OF SUBFIELD INFORMATION (RTXSBL) 02 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 

RTXSBLEN 

1 V*1 

LENGTH OF SUBFIELD TEXT 

1 

RTXSBFLG 

1 V*2 

TEXT SUBFIELD FLAGS 

Values Defined in RTXSBFLG 

80 

40 

RTXARBSC 

RTXNOTSC 


SCANNING FOR ARB-CHAR SEPARATION 
SCANNING FOR N0T-SYMB0L 

2 

RTXSBTXT 

1 

SUBFIELD TEXT 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

RTXARBSC 0001 80 RTXSBFLG 0001 .. RTXSBL - 02 RTXSBLEN 0000 .. 

RTXNOTSC 0001 40 RTXSBTXT 0002 .. 
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SCBLOCK 


SCBLOCK: SUBCOMMAND CONTROL BLOCK 

SCBLOCK describes the dynamic entry point for the SUBCOM function and is dynamically 
allocated from free storage by DMSITS. SCBLOCK is invoked via the SCBLOCK macro. 


0 


8 


10 


18 


SIZE 

LENGTH IN DOUBLEWORDS CSCBLOCKD) 04 


LENGTH IN BYTES 


CSCBLOCKB) 20 

HEX 

DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

SCBFWPTR 

4 

CHAIN POINTER TO NEXT SCBLOCK 

4 

SCBWKWRD 

4 

AVAILABLE FOR USER INFORMATION 

8 

SCBNAME 

8 

NAME OF SUBCOMMAND ENVIRONMENT 

10 

SCBPSW 

8 

STARTING PSW FOR SUBCOMMAND 

12 

SCBSFLAG 

1 

SYSTEM FLAG BYTE 

80 

SCBSFSYS 


DENOTES "SYSTEM" ROUTINE — WILL NOT BE 
AUTOMATICALLY DELETED DURING ABEND PROCESSING 

40 

SCBSFSER 


DENOTES "SERVICE" ROUTINE — WILL BE CALLED 

WITH "PURGE" ARGUMENT DURING ABEND PROCESSING 

20 

SCBSFABN 


USED DURING ABEND PROCESSING 

20 

SCBSFINT 


USED DURING END OF COMMAND PROCESSING 

10 

SCBSFEND 


DENOTES 1 END OF COMMAND 1 ROUTINE 

04 

SCBSFIMM 


DENOTES THAT THIS NUCLEUS EXTENSION CAN ALSO BE 
CALLED AS AN IMMEDIATE COMMAND 

02 

SCBSFX 


DENOTES A LOOK-ASIDE ENTRY POINTING TO A REAL 
CMS NUCLEUS ROUTINE 

01 

SCBSHIDE 


USED TO HIDE A NUCLEUS EXTENSION TEMPORARILY 

13 

SCBUFLAG 

1 

USER FLAG BYTE 

14 

SCBENTR 

4 

ENTRY POINT ADDRESS IN PSW 

18 

SCBXORG 

4 

ADDRESS WHERE NUCLEUS EXTENSION WAS LOADED IN 
FREE STORAGE 

1C 

SCBXLEN 

4 

LENGTH IN BYTES OF NUCLEUS EXTENSION. MAY BE 


ZERO FOR SECONDARY ENTRY POINTS 
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CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


SCBENTR 0014 .. 
SCBFWPTR 0000 . . 
SCBLOCKB .... 20 
SCBLOCKD .... 04 
SCBNAME 0008 .. 


SCBPSW 0010 .. 
SCBSFABN 0012 20 
SCBSFEND 0012 10 
SCBSFIMM 0012 04 
SCBSFINT 0012 20 


SCBSFLAG 0012 .. 
SCBSFSER 0012 40 
SCBSFSYS 0012 80 
SCBSFX 0012 02 
SCBSHIDE 0012 01 


SCBUFLAG 0013 . 
SCBWKWRD 0004 . 
SCBXLEN 001C . 
SCBXORG 0018 . 
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SHVBLOCK 


SHVBLOCK: LAYOUT OF SHARED-VARIABLE ACCESS CONTROL BLOCK 

The control blocks for accessing shared variables are chained as a list terminated 
by a null pointer. The list is addressed via the 'private interface* plist in a 
subcommand call to a public variable-sharing environment (e.g. as set up by the EXEC 
2 interpreter). 


SHVNEXT 

SHVUSER 

S*1 | S*2 | ///////// 

SHVBUFL 

SHVNAMA 

SHVNAML 

SHVVALA 

SHVVALL 


SIZE 

SHVBLOK LENGTH IN BYTES CSHVBLEN ) 20 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 


0 

SHVNEXT 

4 

CHAIN POINTER (0 IF 

LAST) 

4 

SHVUSER 

4 

NOT USED, AVAILABLE 
EXCEPT DURING 'FETCH 

FOR PRIVATE USE 

1 NEXT* 

8 

SHVCODE 

1 S*1 

INDIVIDUAL FUNCTION 

CODE 


Function codes defined in SHVCODE 


C6 SHVFETCH COPY VALUE OF SHARED VAR TO BUFFER 

E2 SHVSTORE STORE GIVEN VALUE IN SHARED VARIABLE 

THE FOLLOWING FUNCTION CODES ONLY APPLY TO THE SYSTEM 
PRODUCT INTERPRETER 


84 SHVSYDRO 
86 SHVSYFET 
A2 SHVSYSET 
C4 SHVDROPV 
D5 SHVNEXTV 
D7 SHVPRIV 


SYMBOLIC NAME DROP VARIABLE (LOWERCASE D) 

SYMBOLIC NAME FETCH VARIABLE (LOWERCASE F) 

SYMBOLIC NAME SET VARIABLE (LOWERCASE S) 

DROP VARIABLE 

FETCH 'NEXT* VARIABLE 

FETCH PRIVATE INFORMATION 


9 SHVRET 1 SX2 INDIVIDUAL RETURN CODE FLAG 


Return code flags in SHVRET 


00 SHVCLEAN 
01 SHVNEWV 
02 SHVLVAR 
04 SHVTRUNC 
08 SHVBADN 
10 SHVBADV 
80 SHVBADF 

A 2 

C SHVBUFL 4 


EXECUTION WAS OK 

VARIABLE DID NOT EXIST (SP INTERPRETER ONLY) 
LAST VARIABLE TRANSFERRED (FOR N) 

TRUNCATION OCCURRED FOR 'FETCH* 

INVALID VARIABLE NAME (E.G. TOO LONG) 
INVALID VARIABLE VALUE (E.G. TOO LONG) 
INVALID FUNCTION CODE (SHVCODE) 

RESERVED, SHOULD BE ZERO 

LENGTH OF 'FETCH* VALUE BUFFER 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 



10 

SHVNAMA 

4 

ADDRESS OF PUBLIC VARIABLE 

NAME 

14 

SHVNAML 

4 

LENGTH OF PUBLIC 

VARIABLE 

NAME 

18 

SHVVALA 

4 

ADDRESS OF VALUE 

BUFFER (0 

IF NONE) 

1C 

SHVVALL 

4 

LENGTH OF VALUE 

(SET BY * FETCH*) 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


SHVBADF 0009 80 
SHVBADN 0009 08 
SHVBADV 0009 10 
SHVBLEN .... 20 
SHVBUFL 000C .. 
SHVCLEAN 0009 00 
SHVCODE 0008 . . 


SHVDROPV .... C4 
SHVFETCH 0008 C6 
SHVLVAR 0009 02 
SHVNAMA 0010 .. 
SHVNAML 0014 .. 
SHVNEWV 0009 01 


SHVNEXT 0000 .. 
SHVNEXTV 0008 D5 
SHVPRIV 0008 D7 
SHVRET 0009 .. 
SHVSTORE .... E2 
| SHVSYDR0 .... 84 


I SHVSYFET .... 86 
I SHVSYSET .... A2 
SHVTRUNC 0009 04 
SHVUSER 0004 .. 
SHVVALA 0018 .. 
SHVVALL 001C .. 
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SSAVE 


SSAVE: S YSTEM SAVE AREA 

SSAVE is used by DMSITS to save the value of the SVC old PSW, the caller's 
registers, and other necessary control information required to process the SVC and 
return to the caller. Since SVC calls can be nested, several of these save areas 
can exist at one time. The system save area is dynamically allocated in protected 
free storage. SSAVE is invoked via the SVCSAVE macro. 


0 

S*1 S*2 CODE 

CALLER 

8 

CALLEE 

10 

OLDPSW 

18 

NRMRET 

ERRET 

20 

EGPR0 

EGPR1 

28 

EGPR2 

EGPR3 

30 

EGPR4 

EGPR5 

38 

EGPR6 

EGPR7 

40 

EGPR8 

EGPR9 

48 

EGPR10 

EGPRll 

50 

EGPR12 

EGPR13 

58 

EGPR14 

EGPR15 

60 

EFPR0 

68 

EFPR2 

70 

EFPR4 

78 

EFPR6 

80 

CHKWRDl 

SSAVENXT 

88 

SSAVEPRV 

USAVEPTR 

90 

0STEMP 

SX3 

KEYS | 

98 

KEYS Ccont.) 

XGPR0 

A0 

XGPR1 

XGPR15 

A8 

XCOUNT 

CHKWRD2 

B0 

SSAPSDP2 

S*4 

RESERVED 


LY24-5221 (c) Copyright IBM Corp. 1986 


CMS Data Areas and Control Block Logic 251 



























SSAVE 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


SIZE 

SYSTEM SAVE AREA SIZE IN DOUBLEWORDS (SSAVESZ) 17 
MAXIMUM NUMBER OF KEYS IN STACK (KEYMAX) 07 

HEX 


DISP 

NAME 

LEN MX 

DESCRIPTION 

0 

OVIND 

1 SX1 

OVERRIDE INDICATOR: 0,1,2,3 

1 

TYPFLAG 

1 SX2 

SVC TYPE FLAG BYTE 

Values Defined in TYPFLAG 

80 

40 

20 

10 

08 

02 

01 

2 

TPFERT 

TPFNS 

TPFR01 

TPFUSR 

TPFACB 

TPFSV3 

TPFSVO 

CODE 

2 

ERROR RETURN DESIRED 

NO SAVE AREA ALLOCATED 

RETURN CALLEE'S R0-R1 TO CALLER 
'USER* SVC CALL 

OS VSAM SVC REQUEST 

SVC 203 

OS SIMULATION SVC 

SVC 203 CODE VALUE 

4 

CALLER 

4 

ADDRESS OF SVC CALLER 

8 

CALLEE 

8 

NAME OF ROUTINE BEING CALLED 

10 

OLDPSW 

8 

SVC OLDPSW OF CALLER 

18 

NRMRET 

4 

ADDRESS FOR NORMAL RETURN 

1C 

ERRET 

4 

ADDRESS FOR ERROR RETURN 

20 

EGPRS 

0 

GENERAL REGS AT ENTRY TO SVC 

20 

EGPR0 

4 

RO 

24 

EGPR1 

4 

R1 

28 

EGPR2 

4 

R2 

2C 

EGPR3 

4 

R3 

30 

EGPR4 

4 

R4 

34 

EGPR5 

4 

R5 

38 

EGPR6 

4 

R6 

3C 

EGPR7 

4 

R7 

40 

EGPR8 

4 

R8 

44 

EGPR9 

4 

R9 

48 

EGPR10 

4 

RIO 

4C 

EGPR11 

4 

Rll 

50 

EGPR12 

4 

R12 

54 

EGPR13 

4 

R13 

58 

EGPR14 

4 

R14 

5C 

EGPR15 

4 

R15 

60 

EFPRS 

0 

FLOATING POINT REGS AT ENTRY 
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SSAVE 


DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

60 

EFPR0 

8 


FPR0 

68 

EFPR2 

8 


FPR2 

70 

EFPR4 

8 


FPR4 

78 

EFPR6 

8 


FPR6 

80 

CHKHRD1 

4 


CHECK WORD ONE 

84 

SSAVENXT 

4 


ADDRESS OF NEXT SSAVE AREA 

88 

SSAVEPRV 

4 


ADDRESS OF PREVIOUS SSAVE AREA 

8C 

USAVEPTR 

4 


ADDRESS OF CORRESPONDING USER SAVE AREA 

90 

0STEMP 

4 


TEMPORARY FOR OS SIMULATION ROUTINES 

94 

KEYP 

1 

S*3 

NUMBER OF KEYS ON STACK 

95 

KEYS 

7 


KEY STACK 


THE FOLLOWING FIELDS ARE FILLED IN ONLY BY DMSOVS, THE SVCTRACE SUBROUTINE 


9C 

XGPR0 

4 

EXTRA COPY OF EGPR0 

A0 

XGPR1 

4 

EXTRA COPY OF EGPR1 

A4 

XGPR15 

4 

EXTRA COPY OF EGPR15 

A8 

XCOUNT 

4 

EXTRA COPY OF SVCOUNT 

AC 

CHKWRD2 

4 

SECOND CHECK WORD 

B0 

SSAPSDPL 

4 

CHAIN ANCHOR FOR PSDPL 

BLOCKS USED BY 

PARSER 


B4 

SSACMDRS 

1 S*4 

COMMAND RESOLUTION FLAG 


BITS DEFINED IN SSACMDRS 

80 SSACSRCH CMD SEARCH PERFORMED 

40 SSATRANS CMD NAME TRANSLATED 

20 SSASYNON CMD NAME SYNONYMED 

| B5 3 RESERVED 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CALLEE 

0008 .. 

EGPRO 

0020 


CALLER 

0004 .. 

EGPR1 

0024 


CHKWRD1 

0080 XX 

EGPR10 

0048 


CHKWRD2 

00AC XX 

EGPR11 

004C 


CODE 

0002 . . 

EGPR12 

0050 


EFPRS 

0060 .. 

EGPR13 

0054 


EFPRO 

0060 .. 

EGPR14 

0058 


EFPR2 

0068 . . 

EGPR15 

005C 


EFPR4 

0070 .. 

EGPR2 

0028 


EFPR6 

0078 .. 

EGPR3 

002C 


EGPRS 

0020 . . 

EGPR4 

0030 
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EGPR5 

0034 .. 

OSTEMP 

0090 

• • 

EGPR6 

0038 .. 

OVIND 

0000 

, , 

EGPR7 

003C .. 

SSACMDRS 

00B4 

# 

EGPR8 

0040 .. 

SSACSRCH 

OOB4 

80 

EGPR9 

0044 .. 

SSAPSDPL 

00B0 


ERRET 

001C .. 

SSASYNON 

00B4 

20 

KEYMAX 

.... 07 

SSATRANS 

00B4 

40 

KEYP 

0094 .. 

SSAVENXT 

0084 

• • 

KEYS 

0095 .. 

SSAVEPRV 

0088 

• • 

NRMRET 

0018 .. 

SSAVESZ 

• • • • 

17 

OLDPSW 

0010 .. 

TPFACB 

0001 

08 
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CROSS REFERENCE (Name Disp Value) 


TPFERT 

0001 

80 

TPFSVO 

0001 

01 

TYPFLAG 

0001 .. 

XGPR0 

009C 

TPFNS 

0001 

40 

TPFSV3 

0001 

02 

USAVEPTR 

008C .. 

XGPR1 

00A0 

TPFR01 

0001 

20 

TPFUSR 

0001 

10 

XC0UNT 

00A8 .. 

XGPR15 

00A4 
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SUBSECT 


SUBSECT: SUBSET WORK AREA 

SUBSECT defines the fields in the SUBSET work area which is used by CMS SUBSET 
command processing and abend recovery. The SUBSECT block is pointed to by the 
ASUBSECT field in NUCON. SUBSECT is invoked via the SUBSECT macro. 


00 

/////////// SUBRMSGL 



SUBRMSG 1 

20 

__i ""i 



RMSGBUF 

40 

RMSGBUF 

48 



50 

CMSTIM 1 

60 

_ 



STARS 

70 



78 

ASUBRET 

STAESAV 

80 

SPIESAV 

SWTCHSAV 

88 

STAXSAV 

ASUBFST 

90 

ASUBSTAT 


98 

ERRNUM 

A0 



TIMBUF 



SHE 

MAXIMUM LENGTH OF READY MESSAGE IN BYTES (SUBRMSGM) IF 

HEX 

DISP NAME LEN KEY DESCRIPTION 

| 0 3 RESERVED FOR FUTURE USE 

| 3 SUBRMSGL 1 LENGTH OF RDYMSG IN BYTES 

NOTE* SUBRMSG MUST START ON FULL WORD BOUNDARY AND SUBRMSGL 
MUST BE THE BYTE IMMEDIATELY PRECEDING RDYMSG 

| 4 SUBRMSG 31 TEXT OF READY MESSAGE 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

23 


1 

RESERVED FOR FUTURE USE 

24 

RMSGBUF 

40 

READY/TIME MESSAGE FORMATTING AREA 


PLIST FOR GETTING TIMES FROM DMSINM 
4C CMSTIM 24 PLIST FOR GETTING TIMES FROM DMSINM 

PLIST FOR ACTLKP AS USED BY SUBSET 
64 STARS 18 PLIST FOR ACTLKP AS USED BY SUBSET 


52 


2 

RESERVED 



SUBSET 

ADDRESS 

STORAGE 

AREAS 




78 

ASUBRET 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

7C 

STAESAV 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

80 

SPIESAV 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

84 

SWTCHSAV 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

88 

STAXSAV 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

8C 

ASUBFST 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

90 

ASUBSTAT 

4 

SUBSET 

ADDRESS 

STORAGE 

AREA 

98 

ERRNUM 

8 

WORK AREA FOR 

ERROR RETURN-CODE 

A0 

TIMBUF 

32 

WORK AREA FOR 

DMSINM TO STORE DATE AND TIME 


EB P 55 


IJ Na me Disp Mk M & l 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ASUBFST 008C .. 
ASUBRET 0078 . . 
ASUBSTAT 0090 . . 
CMSTIM 004C .. 


ERRNUM 0098 .. 
RMSGBUF 0024 . . 
SPIESAV 0080 .. 
STAESAV 007C . . 


STARS 0064 .. 
STAXSAV 0088 . . 
| SUBRMSG 0004 


| SUBRMSGL 0003 
SWTCHSAV 0084 .. 
TIMBUF 00A0 .. 
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SVCSECT 


SVCSECT: SVC INTERRUPT STORAGE 

SVCSECT describes the fields used by DMSITS in handling SVC interrupts. SVCSECT is 
pointed to by the ASVCSECT field in NUCON. SVCSECT is invoked via the SVCSECT 
macro. 


0 

8 

10 

18 

20 

28 

30 


78 


158 

160 

168 

170 

178 

180 

188 

190 

198 

1A0 

1A8 

1B0 

1B8 

ICO 

1C8 


LY24-5221 (c) Copyright IBM Corp. 1986 


JNUMB 

JFIRST 

JF4 

JLAST 

S*1 | /// | SVCAB 

CURRALOC 

LASTALOC 

DEPTH 

ADMSOVS 

OVBPF 

OVBTF 

OVAPF | OVATF 

S*2 | S*3 

////////// 


SVCSAVE 


NRMSAV 


///////////////////// 

SVCSTOP 

SVLADW 


SVCOUNT 

SVLAD 

SVLFS 


LOADLIST 

LOAONAME 

RESERVED 

RESERVED 

LOADSTRT 

RESERVED 

RESERVED 

MODLIST 

DUMCOM 


I 


S*4 


ZER03 


TRANSRT 


I 


TRANSRT (cont.) 


S*5 
TEMP02 


ADTRANS 
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IDO 

SVCSPOOL 

SVCUPOOL j 

1D8 

RESERVED | 

1E0 

RGPRO 

RGPR1 

1E8 

RGPR2 

RGPR3 

1F0 

RGPR4 

RGPR5 

1F8 

RGPR6 

RGPR7 

200 

RGPR8 

RGPR9 

208 

RGPR10 

RGPR11 

210 

RGPR12 

RGPR13 

218 

RGPR14 

RGPR15 

220 

RFPRO 

228 

RFPR2 

230 

RFPR4 

238 

RFPR6 

240 



HEX 

DISP NAME LEN KEY DESCRIPTION 


0 USVCTBL 
KEEP NEXT FOUR 
0 JNUMB 
4 JFIRST 
8 JF4 
C JLAST 


0 A 'HANDLE' FOR THE FOLLOWING 

IN ORDER 

4 NUMBER OF DOUBLEWORDS IN SVC-NUMBER TABLE 

4 ADDRESS OF FIRST ITEM (IF ANY) IN TABLE 

4 (FOR BXLE) 

4 ADDRESS OF LAST ITEM IN TABLE 


START-UP FLAGS — INDICATE WHAT MODE THE CALLEE IS TO BE STARTED UP. 
10 SFLAG 1 S*1 FLAG BYTE 


Values Defined in SFLAG 


80 SFSYS 
40 SFTRN 
20 SFNUC 
02 SFNONUCX 
01 SFREN 


SYSTEM FLAG — SVC PROTECT KEY IS ZERO 
TRANSIENT AREA ROUTINE — SYSTEM MASK IS OFF 
NUCLEUS ROUTINE — SYS MASK OFF 
SUPPRESS NUCLEUS EXTENSION 
ILLEGAL RE-ENTRY FLAG 


11 


UNUSED 


12 SVCAB 


2 SVC ABEND CODE, IF ANY 
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SVCSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

14 

CURRALOC 

4 

CURRENT ALLOCATED SAVE AREA 

18 

LASTALOC 

4 

LAST ALLOCATED SAVE AREA 

1C 

DEPTH 

4 

NESTED SVC DEPTH 

INFORMATION FOR 

SVCTRACE 

20 

ADMSOVS 

4 

ADDRESS OF DMSOVS 

24 

OVBPF 

2 

'BEFORE PRINT' FLAGS 

26 

OVBTF 

2 

'BEFORE TYPE' FLAGS 

28 

OVAPF 

2 

'AFTER PRINT' FLAGS 

2A 

OVATF 

2 

'AFTER TYPE' FLAGS 


DEFINITIONS OF FLAGS FOR EACH PAIR OF FLAG BYTES 


80 0VF10N 
40 0VF1GB 
20 OVF1GA 
10 OVF1GS 
08 0VF1PA 
04 OVF1F 
01 OVF1FS 
80 0VF2ST 
40 0VF2CM 
20 0VF2NR 
10 0VF20S 
08 0VF2WA 


THIS OPTION IS ON 

GPRS BEFORE CALL WANTED 

GPRS AFTER CALL WANTED 

GPRS RETURNED FROM SVC CALLEE 

PARAMETER LIST WANTED 

FLOATING POINT REGS WANTED 

FPRS RETURNED FROM SVC CALLEE 

' STOP 1 WANTED 

CMS SVC TRACE WANTED 

NORMAL RETURN CMS SVC f S WANTED 

OS SVC'S WANTED 

■WAIT* CMS SVC'S WANTED 


2C OVSTAT 1 S*2 CURRENT STATUS OF SVCTRACE 


Values Defined in OVSTAT 


80 OVSON 
40 OVSPREV 
20 OVSAFT 
10 OVSHO 
08 OVSSO 


OVERRIDES ARE ON 
'SVCTRACE SAME 1 IS LEGAL 
'AFTER' BIT , SET BY DMSITS 
'HALT OVERRIDES' FLAG 
'SUSPEND OVERRIDES' FLAG 


NLS COMMAND RESOLUTION FLAG - DMSINT , CSF, ITS USE ONLY 


2D 

SVCCMDRS 

1 

S*3 COMMAND RESOLUTION FLAG 

Values Defined : 

in SVCCMDRS 

80 

SVCCSRCH 


COMMAND SEARCH PERFORMED 

40 

SVCTRANS 


COMMAND NAME TRANSLATED 

20 

SVCSYNON 


COMMAND NAME SYNONYMED 

10 



RESERVED FOR IBM USE 

08 



RESERVED FOR IBM USE 

04 



RESERVED FOR IBM USE 

02 



RESERVED FOR IBM USE 

01 



RESERVED FOR IBM USE 

2E 


2 

UNUSED 

30 

SVCSAVE 

72 

INTSVC WORK AREA 

78 

NRMSAV 

224 

NORMAL STANDARD INFORMATION 

158 


4 

UNUSED 

15C 

SVCOUNT 

4 

CURRENT SVC COUNT 

160 

SVCSTOP 

4 

FOR DMSITS DEBUGGING 
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MSP 

NAME 

LEU KEY 

DESCRIPTI 







164 

SVLAD 

4 

SAVE REG 

14 

FOR 

DMSLAD 




168 

SVLADW 

4 

SAVE REG 

14 

FOR 

DMSLADW 




16C 

SVLFS 

4 

SAVE REG 

14 

FOR 

DMSLFS 




170 

LOADLIST 

8 








178 

LOADNAME 

8 








180 


16 

RESERVED 







190 

LOADSTRT 

8 








198 


16 

RESERVED 

FOR 

: FUTURE USE 





KEEP NEXT FIVE IN ORDER 


1A8 

MODLIST 

8 

ROUTINE NAME 

1B0 

DUMCOM 

8 

MODULE 'FILENAME* FILLED IN HERE 

1B8 

SSMON 

1 S*4 

'FENCE' AND ALLOWS ALL INTERRUPTS 

1B9 

ZER03 

3 

THREE-BYTE ZERO 

1BC 

TRANSRT 

8 

HOLDS FILENAME OF TRANSIENT ROUTINE 

1C4 

TRANMSK 

1 S*5 


1C5 

ADTRANS 

3 


1C8 

TEMP02 

8 

(FOR 'CVD' & OTHER SCRATCH-USE) 

1D0 

SVCSPOOL 

4 

POOL OF SYSTEM SAVE AREAS 

1D4 

SVCUPOOL 

4 

POOL OF USER SAVE AREAS 

1D8 


8 

RESERVED FOR FUTURE USE 

1E0 

RGPRS 

0 

RETURNED GPRS 

1E0 

RGPRO 

4 

RO 

1E4 

RGPR1 

4 

R1 

1E8 

RGPR2 

4 

R2 

1EC 

RGPR3 

4 

R3 

1F0 

RGPR4 

4 

R4 

1F4 

RGPF5 

4 

R5 

1F8 

RGPR6 

4 

R6 

1FC 

RGPR7 

4 

R7 

200 

RGPR8 

4 

R8 

204 

RGPR9 

4 

R9 

208 

RGPR10 

4 

RIO 

20C 

RGPR11 

4 

Rll 

210 

RGPR12 

4 

R12 

214 

RGPR13 

4 

R13 
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SVCSECT 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

218 

RGPR14 

4 

R14 


21C 

RGPR15 

4 

R15 


220 

RFPRS 

0 

RETURNED 

FLOATING POINT REGS 

220 

RFPR0 

8 

FPR0 


228 

RFPR2 

8 

FPR2 


230 

RFPR4 

8 

FPR4 


238 

RFPR6 

8 

FPR6 


240 

NRMUSAV 

96 

'NRMSAV' 

USER SAVE AREA 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ADMSOVS 

0020 


OVF1GA 

002A 

20 

RGPF5 

01F4 


SFSYS 

0010 

80 

ADTRANS 

01C5 


0VF1GB 

002A 

40 

RGPRS 

01E0 


SFTRN 

0010 

40 

CURRALOC 

0014 


0VF1GS 

002A 

10 

RGPR0 

01E0 


SSMON 

01B8 


DEPTH 

001C 


0VF10N 

002A 

80 

RGPR1 

01E4 


SVCAB 

0012 

, # 

DUMCOM 

01B0 


OVF1PA 

002A 

08 

RGPR10 

0208 


SVCCMDRS 

002D 

, , 

JFIRST 

0004 


0VF2CM 

002A 

40 

RGPR11 

020C 


SVCCSRCH 

002D 

80 

JF4 

0008 


0VF2NR 

002A 

20 

RGPR12 

0210 


SVCOUNT 

015C 


JLAST 

oooc 


0VF20S 

002A 

10 

RGPR13 

0214 


SVCSAVE 

0030 

, , 

JNUMB 

0000 


0VF2ST 

002A 

80 

RGPR14 

0218 


SVCSPOOL 

01D0 

, , 

LASTALOC 

0018 


0VF2WA 

002A 

08 

RGPR15 

021C 


SVCSTOP 

0160 


LOADLIST 

0170 


0VSAFT 

002C 

20 

RGPR2 

01E8 


SVCSYNON 

002D 

20 

L0ADNAME 

0178 


0VSH0 

002C 

10 

RGPR3 

01 EC 


SVCTRANS 

002D 

40 

LOADSTRT 

0190 


0VS0N 

002C 

80 

RGPR4 

01F0 


SVCUPOOL 

01D4. 


MODLIST 

01A8 


0VSPREV 

002C 

40 

RGPR6 

01F8 


SVLAD 

0164 


NRMSAV 

0078 


OVSSO 

002C 

08 

RGPR7 

01FC 


SVLADW 

0168 


NRMUSAV 

0240 


0VSTAT 

002C 


RGPR8 

0200 


SVLFS 

016C 


0VAPF 

0028 


RFPRS 

0220 


RGPR9 

0204 


TEMP02 

01C8 


OVATF 

002A 


RFPR0 

0220 


SFLAG 

0010 


TRANMSK 

01C4 


OVBPF 

0024 


RFPR2 

0228 


SFNONUCX 

0010 

02 

TRANSRT 

01BC 


OVBTF 

0026 


RFPR4 

0230 


SFNUC 

0010 

20 

USVCTBL 

0000 


0VF1F 

002A 

04 

RFPR6 

0238 


SFREN 

0010 

01 

ZER03 

01B9 



0VF1FS 002A 01 
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SVCWORK: SVC WORKAREA 

SVCWORK is a workarea and register savearea for the CMS DOS simulation modules. 
SVCWORK is invoked by itself. 


[ 

L_ 

SVCREGS 


_i 

SVCPACK 

SVCCONV 


Save area 


i 


r~ 

SVCRG14 


= _ 

SVCGVCE 


_ I 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 


0 

SVCREGS 

16 

REGISTER SAVE AREA 

10 

SVCPACK 

8 

PACK/UNPACK WORK 

AREA 

18 

SVCCONV 

8 

CONVERT WORKAREA 


20 


20 

SAVEAREA 


34 

SVCRG14 

4 

DMSGMF R14 SAVEAREA 

38 

SVCGVCE 

24 

GETVCE PARAMETER 

LIST 

CROSS 

REFERENCE 

(Name 

Disp Value) 



This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

SVCCONV 0018 .. SVCPACK 0010 .. SVCREGS 0000 .. 

SVCGVCE 0038 .. SVCRG14 0034 .. 
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SVEARA 


SVEARA: LTA AND PP SAVE AREA DSECT 

SVEARA describes the fields in a VSE Logical Transient Area CLTA) and Problem 
Program (PP) save area. SVEARA is invoked via the DOSAVE macro. These areas are 
used by DOS/VS routines to save the value of the PSW and registers for purposes such 
as linkage to and from transient routines. 


0 

///////////////////// 

///////////////////// 

8 

SVEPSW 

SVEPSW2 

10 

SVER09 

SVEROA 

18 

SVEROB 

SVEROC 

20 

SVEROD 

SVEROE 

28 

SVEROF 

SVER00 

30 

SVER01 

SVER02 

38 

SVER03 

SVER04 

40 

SVER05 

SVER06 

48 

SVER07 

SVER08 


HEX 


DISP 

NAME 

LEN KEY 

DESCRIPTION 


8 

SVEPSW 

0 

FIRST HALF PSW 


8 

SVEASM 

1 

SYSTEM MASK 


9 

SVEAKA 

1 

KEY AND AMWP 


A 

SVEAIC 

2 

INTERRUPT CODE 


C 

SVEPSW2 

0 

SECOND HALF PSW 


C 

SVEAICP 

1 

ILC, CC, PROGRAM MASK 


D 

SVEAIA 

3 

INSTRUCTION ADDRESS 


10 

SVEA0908 


REGISTERS 9-8 


10 

SVEA0915 


REGS 9-15 


10 

SVER09 

4 

SAVE AREA FOR REGISTER 

9 

14 

SVEROA 

4 

SAVE AREA FOR REGISTER 

10 

18 

SVEROB 

4 

SAVE AREA FOR REGISTER 

11 

1C 

SVEROC 

4 

SAVE AREA FOR REGISTER 

12 

20 

SVEROD 

4 

SAVE AREA FOR REGISTER 

13 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 



24 

SVEROE 

4 

SAVE 

AREA 

FOR 

REGISTER 

14 

28 

SVEROF 

4 

SAVE 

AREA 

FOR 

REGISTER 

15 

2C 

SVEA0008 


REGS 

0-8 




2C 

SVER00 

4 

SAVE 

AREA 

FOR 

REGISTER 

0 

30 

SVER01 

4 

SAVE 

AREA 

FOR 

REGISTER 

1 

34 

SVER02 

4 

SAVE 

AREA 

FOR 

REGISTER 

2 

38 

SVER03 

4 

SAVE 

AREA 

FOR 

REGISTER 

3 

3C 

SVER04 

4 

SAVE 

AREA 

FOR 

REGISTER 

4 

40 

SVER05 

4 

SAVE 

AREA 

FOR 

REGISTER 

5 

44 

SVER06 

4 

SAVE 

AREA 

FOR 

REGISTER 

6 

48 

SVER07 

4 

SAVE 

AREA 

FOR 

REGISTER 

7 

4C 

SVER08 

4 

SAVE 

AREA 

FOR 

REGISTER 

8 


CROSS REFERENCE (Name Pisp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


SVEAIA 

000D .. 

SVEA0915 

0010 .. 

SVEROE 

0024 .. 

SVER04 

003C . 

SVEAIC 

000A .. 

SVEPSW 

0008 .. 

SVEROF 

0028 .. 

SVER05 

0040 . 

SVEAICP 

000C .. 

SVEPSW2 

000C .. 

SVEROO 

002C .. 

SVER06 

0044 . 

SVEAKA 

0009 .. 

SVER0A 

0014 .. 

SVER01 

0030 .. 

SVER07 

0048 . 

SVEASM 

0008 .. 

SVER0B 

0018 .. 

SVER02 

0034 .. 

SVER08 

004C . 

SVEA0008 

002C .. 

SVER0C 

001C .. 

SVER03 

0038 .. 

SVER09 

0010 . 

SVEA0908 

0010 .. 

SVEROD 

0020 .. 
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SYSCOM 


SYSCOM: SYSTEM COMMUNICATION REGION 

SYSCOM describes the fields in the SYSCOM block which is the CMS/DOS equivalent of 
the VSE System Communication Region (SYSCOM). The ASYSCOM field in NUCON points to 
the SYSCOM block in DMSNUC. SYSCOM is invoked via the SYSCOM macro. 


0 

1JBERBLC 

///////////////////// 

8 

IJBERR19 

IJBPUBRS 

10 

///////////////////////////////////////////// 1 

18 

///////////////////// 

IJBLTA 

20 

IJBPPBEG 

IJBCHANQ 

28 

IJBQSIZE | IJBQLNG 

IJBNPART | SX1 | SX2 

30 

///////////////////// 

IJBC0NSP 

38 

IJB0CFCM 

///////////////////// 

40 

SX3 | SX4 | SX5 | S*6 

///////////////////// 

48 

///////////////////// 

IJBTKHLD 

50 

///////////////////////////////////////////// [ 

58 

IJBLIK | IJBTIK 

IJBPWR 

60 

IJBTCAVT 

IJBRFTAB 

68 

///////////////////// 

IJBOLTEP 

70 

IJBRASLN 

IJBTRTAB 

78 

IJBPBOWN 

IJBJATAB 

80 

///////////////////// 

IJBCCWT 

88 

IJBSAVSD 

IJBLNSTB 

90 

IJBARBUF 

IJBAPTA 

98 

///////////////////////////////////////////// 

A0 

///////////////////////////////////////////// 

A8 

///////////////////////////////////////////// 

B0 

IJBTTAB 

///////////////////// 

B8 

///////////////////// 

IJBTPBAL | IJBTTPID 

CO 

IJBMFCER 1 

C8 

»- 

1 

1 t/> 

I * 

1 "4 

1 

l_ 

IJPUBLN | IJBAPN0 1 
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DO 

IJBSEGT 

//////////////////// 

D8 

IJBB0X 

IJBASMCB 

EO 

IJBDPDTB 

IJBOCDEV | IJBNTASK 

E8 

////////////////////// 

IJBE0R 

FO 

IJBFTTAB 

IJBSVA 

F8 

IJBSVIS 

IJBARPSL 

100 

IJBARPSR 

IJBDLAB 

108 

IJBASY 

IJBSLACB 

110 

IJBSVIPL 

IJBAMSVA 

118 

////////////////////// 

IJBETSS 

120 

IJBSCTAB 

IJBPCSAV 

128 

IJBSUNIT 

IJBPLCT 

130 

SYS$C0DE ! 


HEX 


MSP 

NAME 

LEN KEY 

DESCRIPTION 

0 

IJBERBLC 

4 

ADDRESS OF ERROR BLOCK 

4 


4 

RESERVED 

8 

IJBERR19 

4 

CANCEL EXIT FOR ATTENTION 

C 

IJBPUBRS 

4 

SYSRES PUB ADDRESS 

10 


12 

RESERVED 

1C 

IJBLTA 

4 

POINTER TO LOGICAL TRANSIENT AREA 

20 

\I JBPPBEG 

4 

POINTER TO PROBLEM PROGRAM AREA 

24 

1JBCHANQ 

iVflptr 

4 

POINTER TO CHANNEL QUEUE 

24 


FREE LIST POINTER 

28 

IJBQSIZE 

2 

NUMBER OF CHANNEL QUEUE ENTRIES 

2A 

IJBQLNG 

2 

LENGTH OF ONE ERROR QUEUE ENTRY 

2C 

IJBNPART 

2 

NUMBER OF PARTITIONS 

2E 

IJBFLG05 

1 S*1 

FLAGS AND SWITCHES 
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SYSCOM 


DISP 

NAME 

LEN KEY 

DESCRIPTION 

Values Defined in IJBFLG05 

80 

IJBAF 


AF SUPERVISOR 

40 

IJBVSE 


DGS/VSE SUPERVISOR 

2F 

IJBFLG06 

1 S*2 

FLAGS FOR IPL 

Values Defined in IJBFLG06 

80 

IJBEMODE 


HARDWARE SUPPORTED 

04 

IJBCKD 


DISK SUPPORT FOR CKD 

02 

IJBFBA 


DISK SUPPORT FOR FB/E 

01 

IJB3800 


3800 SUPPORT INCLUDED 

30 


4 

RESERVED 

34 

IJBCONSP 

4 

ADDRESS OF CRT TABLE 

34 

IJBOCFLG 



38 

IJBOCFCM 

4 

OCF COMMUNICATION AREA 

3C 


4 

RESERVED 

40 

IJBFLG01 

1 S*3 

FLAGS AND SWITCHES 125 RMS 

Values Defined in IJBFLG01 

80 

IJBRMSR 


RMSR SUPPORTED 

40 

IJBRMS 


RMS SUPPORTED 

20 



RESERVED - MUST BE ZERO 

01 

IJBITDWN 


IT-SUPPORT DOWN 

41 

IJBFLG02 

1 S*4 

SWITCH BYTE 

42 

IJBFLG03 

1 S*5 

FLAGS AND SWITCHES 

43 

IJBFLG04 

1 S*6 

FLAGS AND SWITCHES 

44 


8 

RESERVED 

4C 

IJBTKHLD 

4 

ADDRESS OF TRACK HOLD TABLE 

4C 

IJBTHPTR 


TRACKHOLD FLPTR 

50 


8 

RESERVED 

58 

IJBLIK 

2 

KEY OF TASK OWNING THE LTA 

5A 

IJBTIK 

2 

TASK INTERRUPT KEY 

5A 

TID 

2 

ID OF TASK RUNNING 

5B 

TIDBYTE 


SIGNIFICANT PART OF TID 

5C 

IJBPWR 

4 

POINTER TO POWER TABLE 

60 

IJBTCAVT 

4 

SPACE FOR VTAM ADDRESS 

64 

IJBRFTAB 

4 

POINTER TO RF TABLE 

68 

IJBEUECB 

4 

RESERVED 

6C 

IJBOLTEP 

4 

ADDRESS OF OLTEP BUCKET 

70 

IJBRASLN 

4 

POINTER TO RAS LINKAGE AREA 

74 

IJBTRTAB 

4 

ADDRESS OF ASCII TABLE 

78 

IJBPBOWN 

4 

ADDRESS OF PUB OWNERSHIP TABLE 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

7C 

IJBJATAB 

4 

ADDRESS OF JOB ACCOUNTING COMM. AREA 

80 


4 

RESERVED 

84 

IJBCCWT 

4 

ADDRESS OF CCN TRANS N0RK 

88 

IJBSAVSD 

4 

PNTR TO SDAID COMM. AREA 

8C 

IJBLNSTB 

4 

ADDRESS OF LINE MODE TABLE 

90 

IJBARBUF 

4 

ADDRESS OF ATTN INPUT BUFFER 

94 

IJBAPTA 

4 

ADDRESS OF PTA 

98 


24 

RESERVED 

BO 

IJBTTAB 

4 

ADDRESS OF TTIMER TABLE 

B4 


4 

RESERVED 

B8 


4 

RESERVED 

BC 

IJBTPBAL 

2 

TPBALANCING INFORMATION 

BE 

IJBTTPID 

2 

TASK TIMER QHNER 

CO 

IJBMFCER 

11 

REPOSITE INFORMATION MFCM AND MFCU ERP 

CB 

IJBNERQ 

1 S*7 

NUMBER OF ERROR QUEUE ENTRIES 

CC 

IJBPUBLN 

2 

LENGTH OF PUB TABLE 

CE 

IJBAPNO 

2 

NUMBER OF ACTIVE PARTITIONS 

DO 

IJBSEGT 

4 

ADDRESS OF SEGMENT TABLE 

D4 


4 

RESERVED 

D8 

IJBBQX 

4 

POINTER TO BOUNDARY BOX 

DC 

IJBASMCB 

4 

ADDRESS OF STORAGE MGMT 

E0 

IJBDPDTB 

4 

POINTER TO DPD TABLE 

E4 

IJBOCDEV 

2 

CUU OF SYSTEM 1 S OP. CON. 

E6 

IJBNTASK 

2 

NUMBER OF SUBTASKS SUPPORTED 

E8 


4 

RESERVED 

EC 

IJBEOR 

4 

END OF REAL STORAGE 

F0 

IJBFTTAB 

4 

ADDRESS OF THE FETCH TABLE 

F4 

IJBSVA 

4 

ADDRESS OF THE SVA START 

F8 

IJBSVIS 

4 

ADDRESS OF SVA GETVIS AREA 

FC 

IJBARPSL 

4 

ADDRESS OF RPS DIRECTORY LIST 

100 

IJBARPSR 

4 

SDDR OF SECTOR CALC ROUTINE 

104 

IJBDLAB 

4 

POINTER TO SYSTEM CODE NAME 

108 

IJBASY 

4 

ADDRESS OF ASYN OP COM TAB 

108 

IJBASYFL 


FLAGBYTE FOR ASYN OP COM 

10C 

IJBSLACB 

4 

ADDRESS OF LABEL AREA 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

110 

IJBSVIPL 

4 

ADDRESS OF IPL SUPERVISOR 

114 

IJBAMSVA 

4 

ADDRESS OF SVA MOD AREA 

118 


4 

RESERVED 

11C 

IJBETSS 

4 

POINTER TO ETSS VECTOR TABLE 

120 

IJBSCTAB 

4 

POINTER TO SEC VECTOR TABLE 

124 

IJBPCSAV 

4 

SAVE AREA FOR REG IF PC IN SVA 

128 

IJBSUNIT 

4 

TABLE OF SYSTEM UNITS 

12C 

IJBPLCT 

4 

POINTER LIBRARY CONTROL TABLE 

130 

SYSSCODE 

13 

SYSTEM CODE NAME 

13D 

IJBFINSC 


END OF SYSTEM COMMUNICATION REGION 


CROSS REFERENCE (Name Disp Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


IJBAF 

002E 

80 

IJBERR19 

0008 


IJBNPART 

002C 


IJBSCTAB 

0120 

# # 

IJBAMSVA 

0114 


IJBETSS 

one 


IJBNTASK 

00E6 


IJBSEGT 

00D0 


IJBAPNO 

00CE 


IJBEUECB 

0068 


IJBOCDEV 

00E4 


IJBSLACB 

010C 


IJBAPTA 

0094 


IJBFBA 

002F 

02 

IJBOCFCM 

0038 


IJBSUNIT 

0128 


IJBARBUF 

0090 


IJBFINSC 

013D 


IJBOCFLG 

• • • • 

34 

IJBSVA 

00F4 


IJBARPSL 

00FC 


IJBFLG01 

0040 


IJBOLTEP 

006C 


IJBSVIPL 

0110 


IJBARPSR 

0100 


IJBFLG02 

0041 


IJBPBOWN 

0078 


IJBSVIS 

00F8 


IJBASMCB 

00DC 


IJBFLG03 

0042 


IJBPCSAV 

0124 


IJBTCAVT 

0060 


IJBASY 

... 

L08 

IJBFLG04 

0043 


IJBPLCT 

012C 


IJBTHPTR 

.... 

4C 

IJBASYFL 

0108 


IJBFLG05 

002E 


IJBPPBEG 

0020 


IJBTIK 

.... 

5A 

IJBBOX 

00D8 


IJBFLG06 

002F 


IJBPUBLN 

OOCC 


IJBTKHLD 

004C 


IJBCCWT 

0084 


IJBFLPTR 

0024 


IJBPUBRS 

000C 


IJBTPBAL 

OOBC 


IJBCHANQ 

0024 


IJBFTTAB 

00F0 


IJBPWR 

005C 


IJBTRTAB 

0074 


IJBCKD 

002F 

04 

IJBITDWN 

0040 

oi 

IJBQLNG 

002A 


IJBTTAB 

00B0 


IJBCONSP 

0034 


IJBJATAB 

007C 


IJBQSIZE 

0028 


IJBTTPID 

OOBE 


IJBDLAB 

0104 


IJBLIK 

0058 


IJBRASLN 

0070 


IJBVSE 

002E 

40 

IJBDPDTB 

00E0 


IJBLNSTB 

008C 


IJBRFTAB 

0064 


IJB3800 

002F 

01 

IJBEMODE 

002F 

80 

IJBLTA 

001C 


IJBRMS 

0040 

40 

SYSSCODE 

0130 

# % 

IJBEOR 

00 EC 


IJBMFCER 

OOCO 


IJBRMSR 

0040 

80 

TID 

005A 

* 9 

IJBERBLC 

0000 


IJBNERQ 

OOCB 


IJBSAVSD 

0088 

. . 

TIDBYTE 

.... 

5B 
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SYSNAMES: SAVED SYSTEMS NAMES 

SYSNAMES defines the names of any saved systems that may be loaded by CMS routines. 
SYSNAMES describes the entries in the SYSNAMES table which is pointed to by the 
ASYSNAMES field in NUCON. SYSNAMES is invoked via the SYSNAMES macro. 


0 

8 

10 

18 

20 


SIZE 

SIZE IN DOUBLEWORDS (SYSNCNT) 04 


HEX 

DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

CMSVSAM 

8 

VSAM SHARED SYSTEM NAME 

8 

CMSAMS 

8 

AMS SHARED SYSTEM NAME 

10 

CMSDOS 

8 

DOS SHARED SYSTEM NAME 

18 

CMSBAM 

8 

DOSVS/BAM SHARED SEGMENT NAME 

20 

SYSNEND 

0 



CMSVSAM 

CMSAMS 

CMSDOS 

CMSBAM 

SYSNEND 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

CMSAMS 0008 .. CMSDOS 0010 .. CMSVSAM 0000 .. SYSNCNT _ 04 

CMSBAM 0018 .. SYSNEND 0020 .. 
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TCBADR 


l 

TCBADR: TASK CONTROL BLOCK 

TCBADR simulates the VSE task control block. TCBADR is invoked via the BGTCB macro. 


0 

| T*1 

FATHERID | T*2 | T*3 

8 

TCBTIB 

TCBSAVE 

10 

TCBINFO 

TCBECB 

18 

TCBSAV2 

TCBITPTR 

20 

TCBITSAV 

TCBABPTR 

28 

TCBABSAV 

TCBPCPTR 

30 

TCBPCSAV 



SIZE 

SHORT SYSTEM TASK TCB LENGTH IN BYTES (SSTCBLNG) 24 


HEX 

DISP 

NAME 

LEN KEY 

DESCRIPTION 

0 


2 

LENGTH OF TCB 

2 


1 

RESERVED 

3 

TCBRID 

1 T*1 

RID 

4 

FATHERID 

2 

TID OF ATTACHING TASK 

6 

TCBFLAGS 

1 TX2 

FLAG BYTE 

Values Defined in TCBFLAGS 

80 

SYSRESW 


WRITE ON SYSRES ALLOWED 

10 

ACLOSE 


VSAM AUTO. CLOSE IN PROCESS 

08 

VSAMOPEN 


VSAM ACB’S OPEN IN PARTITION 

7 

TCBFLAG2 

1 T*3 

FLAG BYTE 

8 

TCBTIB 

4 

TIB POINTER 

C 

TCBSAVE 

4 

TASK SAVE AREA ADDRESS 

10 

INTINFO 

4 

INTERRUPT INFORMATION 

14 

AERREXIT 

0 

ERROR EXITS 

14 

TCBECB 

4 

USER TASKS: ADDRESS OF ATTACH ECB 

18 

TCBSAV2 

4 

ADDRESS OF SECOND SAVE AREA 

1C 

TCBITPTR 

4 

ADDRESS OF EXIT ROUTINE OR TECB 

20 

TCBITSAV 

4 

ADDRESS OF EXIT SAVE AREA 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 




24 

TCBABPTR 

4 

ADDRESS 

OF 

AB 

EXIT 

ROUTINE 

28 

TCBABSAV 

4 

ADDRESS 

OF 

AB 

EXIT 

SAVE 

AREA 

2C 

TCBPCPTR 

4 

ADDRESS 

OF 

PC 

EXIT 

ROUTINE 

30 

TCBPCSAV 

4 

ADDRESS 

OF 

PC 

EXIT 

SAVE 

AREA 


CROSS REFEREN CE (Name JDisE V a l u e) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


ACLOSE 0006 10 
AERREXIT 0014 .. 
FATHERID 0004 .. 
INTINFO 0010 . . 
SSTCBLNG .... 24 


SYSRESW 0006 80 
TCBABPTR 0024 .. 
TCBABSAV 0028 . . 
TCBECB 0014 .. 
TCBFLAGS 0006 .. 


TCBFLAG2 0007 
TCBITPTR 001C 
TCBITSAV 0020 
TCBPCPTR 002C 
TCBPCSAV 0030 


TCBRID 0003 .. 
TCBSAVE 000C .. 
TCBSAV2 0018 >. 
TCBTIB 0008 .. 
VSAMOPEN 0006 08 
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TLBBLOK: TAPE LABEL PROCESSING INFORMATION 

TLBBLOK contains information used by the CMS tape label processing routines 
TLBBLOK is invoked via the TLBBLOK macro. 


0 

TLBNAME 

8 

T*1 | T*2 | TX3 | T*4 

TLBTAPID | 

10 

TLBLABID 

18 

TLBBLKCT 



• For nonstandard labels, the following is the format: 


18 


TLBNSLNM 


SIZE 

TLBBLOK SIZE IN DOUBLEWORDS (TLBDWSZ) 04 
TLBBLOK SIZE IN BYTES CTLBSIZE) 20 

HEX 

DISP NAME LEN KEY DESCRIPTION 

0 TLBNAME 8 CALLED RTNE NAME - DMSTLB 

8 TLBTYPE 1 T*1 TYPE OF CALL 


Values Defined in TLBTYPE 


00 

TLBOPIN 

OPEN INPUT 

04 

TLBOPOUT 

OPEN OUTPUT 

08 

TLBCLIN 

CLOSE INPUT 

0C 

TLBCLOUT 

CLOSE OUTPUT 

10 

TLBEOV 

EOV LABEL CALL 


TLBCALL 1 

T*2 CALLER ID 

Values Defined 

in TLBCALL 

80 

TLBOS 

OS SIMULATION 

40 

TLBD0S 

DOS SIMULATION 

20 

TLBCMS 

CMS (COMMAND OR MACRO) 

10 

TLBCMAC 

CMS MACRO 
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DISP NAME 


LEN KEY DESCRIPTION 


A TLBLABT 1 T*3 LABEL TYPE 
Values Defined in TLBLABT 


00 TLBNONE 
01 TLBBLP 
02 TLBSL 
04 TLBUSER 
06 TLBSUL 


NONE SPECIFIED 
NO LABEL PROCESSING 

USER BIT 

STANDARD USER LABELS 


08 

10 

20 

TLBNSL 

TLBNSLMD 

TLBMSPC 


NON STANDARD LABELS 

NSL ROUTINE IS MODULE 

CMS MACRO SPACE TO TM OR 

WTM 

B 

TLBMODE 

1 T*4 

TAPE MODESET BYTE 


C 

TLBTAPID 

4 

TAPEID 


10 

TLBDTFPT 

4 

DTF POINTER FOR DOS 


10 

TLBFCBPT 

4 

FCB POINTER FOR OS 


10 

TLBLABID 

8 

LABSECT NAME (OR ID) FOR 

CMS 

18 

TLBBLKCT 

4 

BLOCK COUNT FOR CMS 


MAPPING BELOW IS 

FOR NSL LABEL ONLY. IT OVERLAYS 

PART 

18 

TLBNSLNM 

8 

NSL ROUTINE FILE NAME 


CROSS 

REFERENCE 

( Name 

Disp Value) 



This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


TLBBLKCT 0018 .. 
TLBBLP 000A 01 
TLBCALL 0009 .. 
TLBCLIN 0008 08 
TLBCLOUT 0008 0C 
TLBCMAC 0009 10 
TLBCMS 0009 20 
TLBDOS 0009 40 


TLBDTFPT 0010 .. 
TLBDWSZ .... 04 
TLBEOV 0008 10 
TLBFCBPT 0010 .. 
TLBLABID 0010 . . 
TLBLABT 000A .. 
TLBMODE 0 0 0B .. 
TLBMSPC 000A 20 


TLBNAME 0000 .. 
TLBNONE 000A 00 
TLBNSL 000A 08 
TLBNSLMD 000A 10 
TLBNSLNM 0018 .. 
TLBOPIN 0008 00 
TLBOPOUT 0008 04 


TLBOS 0009 80 
TLBSIZE .... 20 
TLBSL 000A 02 
TLBSUL 000A 06 
TLBTAPID OOOC .. 
TLBTYPE 0008 .. 
TLBUSER 000A 04 
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TOKLIST 


TOKLIST: CMS-TYPE TOKENIZED LIST 

TOKLIST is used as a template to describe a list of eight-byte tokens. TOKLIST is 
found in PROP copy. 


0 

8 

10 

18 

20 

28 

30 

38 


SIZE 

LENGTH OF A TOKEN (TLEN) 08 
HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

T0KEN1 

8 

FIRST TOKEN 

8 

T0KEN2 

0 

SECOND TOKEN 

8 

T0KEN2F1 

4 

FIRST FULLNORD 

C 

T0KEN2F2 

4 

SECOND FULLW0RD 

10 

T0KEN3 

8 

THIRD TOKEN 

18 

T0KEN4 

8 

FOURTH TOKEN 

20 

T0KEN5 

8 

FIFTH TOKEN 

28 

T0KEN6 

8 

SIXTH TOKEN 

30 

T0KEN7 

8 

SEVENTH TOKEN 

38 

T0KEN8 

8 

EIGHTH TOKEN 


T0KEN1 

T0KEN2 

T0KEN3 

T0KEN4 

T0KEN5 

T0KEN6 

T0KEN7 

T0KEN8 


LY24-5221 (c) Copyright IBM Corp. 1986 


CMS Data Areas and Control Block Logic 275 











TOKLIST 


Contains Restricted Materials of IBM 
Licensed Materials - Property of IBM 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


TLEN 

.... 08 

T0KEN2F1 

0008 .. 

T0KEN4 

0018 .. 

T0KEN7 

0030 

T0KEN1 

0000 .. 

T0KEN2F2 

000C .. 

TOKENS 

0020 .. 

T0KEN8 

0038 

T0KEN2 

0008 .. 

T0KEN3 

0010 .. 

T0KEN6 

0028 .. 
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TRANTBL 


TRANTBL: TRANSLATION TABLES 


0 

100 

200 

300 

400 

500 

600 

700 

800 

900 

A00 

BOO 

COO 

D00 

E00 

F00 

1000 

1100 


HEX 

DISP NAME LEN KEY DESCRIPTION 


0 

TRANSTD 

256 

Standard uppercase table 

100 

TRAST77 

256 

EBCDIC -> 3277 

Character Set 

200 

TRAST78 

256 

EBCDIC -> 3278 

Character Set 

300 

TRAAPL77 

256 

EBCDIC -> 3277 

APL Character Set 

400 

TRAAPL78 

256 

EBCDIC -> 3278 

APL Character Set 

500 

TRATXT77 

256 

EBCDIC -> 3277 

Text Character Set 

600 

TRATXT78 

256 

EBCDIC -> 3278 

Text Character Set 

700 

TRAPL7EC 

256 

EBCDIC -> 3277/APL Compound Chars 

800 

TRAPL7CE 

256 

3277/APL Compound Chars -> EBCDIC 

900 

TRAPL8EC 

256 

EBCDIC -> 3278/APL Compound Chars 

A00 

TRAPL8CE 

256 

3278/APL Compound Chars -> EBCDIC 
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TRANSTD 

TRAST77 

TRAST78 

TRAAPL77 

TRAAPL78 

TRATXT77 

TRATXT78 

TRAPL7EC 

TRAPL7CE 

TRAPL8EC 

TRAPL8CE 

TRATX7EC 

TRATX7CE 

TRATX8EC 

TRATX8CE 

TRATX7ES 

TRATX7SE 
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DISP 

NAME 

LEN KEY 

DESCRIPTION 

| BOO 

TRATX7EC 

256 

EBCDIC -> 

3277/Text Compound Char 

| COO 

TRATX7CE 

256 

3277/Text 

Compound Char -> EBCDIC 

| D00 

TRATX8EC 

256 

EBCDIC -> 

3278/Text Compound Char 

| E00 

TRATX8CE 

256 

3278/Text 

Compound Char -> EBCDIC 

| F00 

TRATX7ES 

256 

EBCDIC -> 

3277/Text Single Char 

1 1000 

TRATX7SE 

256 

3277/Text 

Single Char -> EBCDIC 


CROSS REFERENCE (Name Diso Value) 


This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


TRAAPL77 0300 
TRAAPL78 0400 
TRANSTD 0000 
TRAPL7CE 0800 
TRAPL7EC 0700 


TRAPL8CE 0A00 
TRAPL8EC 0900 
TRAST77 0100 
TRAST78 0200 


TRATXT77 0500 
TRATXT78 0600 
TRATX7CE 0C00 
TRATX7EC 0B00 


TRATX7ES 0F00 
TRATX7SE 1000 
TRATX8CE 0E00 
TRATX8EC 0D00 
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TSOBLKS 


TSOBLKS: TSO CONTROL BLOCKS 

TSOBLKS DSECT describes the entries in the TSOBLKS block which contains OS control 
information used by CMS, that is, the command program parameters list (CCPL), user 
profile table (UPT), protected step control block (PSCB), and the environment 
control table (ECT). The ATSOCPPL field in NUCON points to TSOBLKS block. TSOBLOKS 
is invoked via the TSOBLOKS macro. 


0 

CPPLOBUF 

CPPLUPT 

8 

CPPLPSCB 

CPPLECT 

10 

///////// 

UPTUSER 1 

18 

UPTUSER 

C cont.) 

T*1 | T*2 | T*3 

/// 

20 

PSCBUSER 

T*4 

28 

PSCBGPNM | 

30 

PSCBATR1 

PSCBATR2 



48 

50 

58 

60 

68 

70 

78 

80 

88 


HEX 


DISP 

NAME 

LEN 

KEY DESCRIPTION 

0 

CPPL 

0 

TEMPORARY PLIST TO CP PROGRAMS 

0 

CPPLOBUF 

4 

ADDRESS OF COMMAND LINE 

4 

CPPLUPT 

4 

ADDRESS OF DUMMY UPT 

8 

CPPLPSCB 

4 

ADDRESS OF DUMMY PSCB 

C 

CPPLECT 

4 

ADDRESS OF DUMMY ECT 



PSCBTC0L 

PSCBRLGB 

PSCBUPT 

PSCBUPTL | ///////// 

PSCBRSZ 

| PSCBU 1 

T*5 

ECTRTCD 

ECTIOWA 

T*6 

ECTSMSG 

ECTPCMD 

ECTPCMD (cont.) 

ECTSCMD 

ECTSCMD (cont.) 

TX7 | ECTDDNUM 

ECTUSER 

///////////////////// 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

THE FOLLOWING ARE 

FACSIMILE TSO CONTROL BLOCKS 

10 

UPT 

4 


USER PROFILE TABLE 

12 

UPTUSER 

10 


RESERVED FOR INSTALLATION USE 

1C 

UPTSWS 

1 

TX1 

USER 1 S ENVIRONMENT SWITCH 

Values Defined 

in UPTSWS 

40 

UPTNPRM 



NO PROMPTING IS TO BE DONE 

20 

UPTMID 



PRINT MESSAGE IDENTIFIERS 

10 

UPTNCOM 



NO USER COMMUNICATION ALLOWED VIA SEND 

08 

UPTPAUS 



PAUSE FOR , ? f WHEN IN NON-INTERFACE MODE 

04 

UPTALD 



ATTN HAS BEEN SPECIFIED AS LINE DELETE 

ID 

UPTCDEL 

1 

T*2 

CHAR DELETE CHARACTER 

IE 

UPTDEL 

1 

TX3 

LINE DELETE CHARACTER 

20 

PSCB 

4 


PROTECTED STEP CONTROL BLOCK 

20 

PSCBUSER 

7 


USER ID PADDED WITH BLANKS 

27 

PSCBUSRL 

1 

TX4 

LENGTH OF USER ID 

28 

PSCBGPNM 

8 


ESOTERIC GROUP NAME INIT BY LOGON 

30 

PSCBATR1 

1 

T*5 

15 BIT STRING OF USER ATTRIBUTES 

Values Defined 

in PSCBATR1 

80 

PSCBCTRL 



OPERATOR COMMAND USER 

40 

PSCBACCT 



ACCOUNT COMMAND USER 

20 

PSCBJCL 



SUBMIT COMMAND USER 

31 


1 


RESERVED 

32 

PSCBATR2 

1 

TX6 

15 BIT STRING RESERVED FOR INSTRUCTION USE 

33 


1 


RESERVED 


THE FOLLOWING 6 FULL WORDS ARE USED IN TSO FOR ACCOUNTING. THEY WILL BE LEFT 
INITIALLY TO ZERO. 


4C 

PSCBTCOL 

4 


50 

PSCBRLGB 

4 


54 

PSCBUPT 

4 

POINTER TO THE USER PROFILE TABLE 

58 

PSCBUPTL 

2 

LENGTH OF THE UPT 

5C 

PSCBRSZ 

4 

REGION SIZE REQUESTED IN 2K UNITS 

60 

PSCBU 

8 

RESERVED FOR INSTALLATION USE 

68 

ECT 

4 

ENVIRONMENT CONTROL BLOCK 

68 

ECTRCDF 

1 T*5 

HIGH ORDER BIT INDICATES CP ABENDED 

69 

ECTRTCD 

3 

RETURN CODE FROM LAST CP 

6C 

ECTIOWA 

4 

ADDRESS OF I/O SERVICE ROUTINE WORK AREA 
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TSOBLKS 


DISP NAME LEN KEY DESCRIPTION 


THIS 

FIELD MUST 

BE 

INITIALIZED BY USER AT START 

OF HIS 1 

PROGRAM. 

70 

ECTMSGF 

1 

TX6 

HIGH ORDER BIT MEANS DELETE 2ND 

LEVEL MESSAGES 

71 

ECTSMSG 

3 


ADDRESS OF SECOND LEVEL 

MESSAGE 

CHAIN 

74 

ECTPCMD 

8 


PRIMARY COMMAND NAME 



7C 

ECTSCMD 

8 


SUBCOMMAND NAME 



84 

ECTSWS 

1 

TX7 

ECT SW 




Values Defined in ECTSWS 


80 ECTNOPD 
20 ECTATRM 
10 ECTLOGF 
08 ECTNMAL 
04 ECTNNOT 


0 BIT = 0N, NO OPERANDS EXIST IN COMMAND 
CP TERMINATED BY TMP DETACH W STAE 
L0G0N/0FF REQUESTED TMP TO LOG OFF 
NO USER MESSAGES RECEIVED AT LOGON 
NO BRDCST NOTICES TO BE RECEIVED 


85 ECTDDNUM 3 


COUNTER FOR GEN TEMPORARY DDNAMS 


88 ECTUSER 4 


RESERVED FOR INSTALL 


CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


CPPL 

0000 

• • 

ECTNNOT 

0084 

04 

CPPLECT 

oooc 


ECTNOPD 

0084 

80 

CPPLOBUF 

0000 

# # 

ECTPCMD 

0074 


CPPLPSCB 

0008 


ECTRCDF 

0068 


CPPLUPT 

0004 

• • 

ECTRTCD 

0069 


ECT 

0068 

# # 

ECTSCMD 

007C 


ECTATRM 

0084 

20 

ECTSMSG 

0071 


ECTDDNUM 

0085 

# # 

ECTSWS 

0084 


ECTIOWA 

006C 

# # 

ECTUSER 

0088 


ECTLOGF 

0084 

10 

PSCB 

0020 


ECTMSGF 

0070 

, . 

PSCBACCT 

0030 

40 

ECTNMAL 

0084 

08 

PSCBATR1 

0030 

. . 
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PSCBATR2 

0032 

9 m 

PSCBUSRL 

0027 

# m 

PSCBCTRL 

0030 

80 

UPT 

0010 

# # 

PSCBGPNM 

0028 

# # 

UPTALD 

001C 

04 

PSCBJCL 

0030 

20 

UPTCDEL 

001D 

# # 

PSCBRLGB 

0050 


UPTDEL 

001E 


PSCBRSZ 

005C 

# # 

UPTMID 

001C 

20 

PSCBTCOL 

004C 

# # 

UPTNCOM 

001C 

10 

PSCBU 

0060 

• « 

UPTNPRM 

001C 

40 

PSCBUPT 

0054 

# # 

UPTPAUS 

001C 

08 

PSCBUPTL 

0058 


UPTSWS 

001C 


PSCBUSER 

0020 


UPTUSER 

0012 

# # 
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TVISECT? TAPE VOLUME PROCESSING INTERFACE DSECT 

TVISECT is a PLIST that defines the input to a user supplied DMSTVI module, 
is generated when the user invokes the TVISECT macro. 


0 

8 

10 

18 

20 

28 

30 

38 

40 

48 

50 

78 

80 

88 

90 

98 


TVIM0D 

TVIFUNCT 

TVIFILE 


TVIFID 


| T*1 

TVIVOLID 

TVISEQ 

TVIFSEQ 

TVIGENN 

TVIGENV j TVICRD 

TVICRD (CONT.) 

TVIEXD 

TVIEXD 

TVISYSPL 

TVISYSPA 


TVIFILID 



TVISCRAT 

TVSCRAT(CONT.) 

TVICUU 


TVILABEL 


TVIMODE | 

TVIALT 

TVIRING 

1 ////////// 


SIZE 

TOTAL TVISECT LENGTH 160 

SIZE OF ALL SECTIONS IN DBWRDS (TVISIZE ) 14 

HEX 

DISP NAME LEN KEY DESCRIPTION 

| 0 TVIMOD 8 MODULE NAME FOR SVS 202( 1 DMSTVI 1 ) 

8 TVIFUNCT 8 CALL FUNCTION KEYWORD 

THE FOLLOWING FIELDS WILL BE FILLED IN FROM INFORMATION THAT IS STORED 
IN THE LABSECT. REFER TO THE LABELDEF COMMAND FOR MORE INFORMATION 
ABOUT THESE FIELDS. 

| 10 TVIFILE 8 DDNAME 

| 18 TVIFID 17 FILE ID (RIGHTMOST 17 CHARACTERS) 


TVISECT 
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DISP 

NAME 

LEN 

KEY 

DESCRIPTION 

29 

TVISEC 

1 

TX1 

SECURITY TYPE 

2A 

TVIVOLID 

6 


VOLUME ID TO BE MOUNTED 

30 

TVIVSEQ 

4 


VOLUME SEQUENCE NUMBER 

34 

TVIFSEQ 

4 


FILE SEQUENCE NUMBER 

38 

TVIGENN 

4 


GENERATION NUMBER 

3C 

TVIGENV 

2 


GENERATION VERSION 

3E 

TVICRD 

6 


CREATION DATE 

44 

TVIEXD 

6 


EXPIRATION DATE 

4A 

TVISYSPL 

4 


LENGTH OF SYSPARM STRING 

4C 

TVISYSPA 

4 


ADDRESS OF SYSPARM STRING 

50 

TVIFILID 

44 


FILE IDENTIFIER 

7C 

TVISCRAT 

8 


SCRATCH/NOSCRATCH SPECIFIED AS LABELDEF VOLID 


THE FOLLOWING FIELDS WILL BE FILLED IN FROM INFORMATION THAT IS STORED 
IN THE FCBSECT (SUPPLIED BY THE FILEDEF COMMAND). 


84 

TVICUU 4 

VIRTUAL DEVICE ADDRESS(TAPO-TAPF) 

88 

TVILABEL 8 

SL 

- LABEL PROCESSING 

90 

TVIMODE 4 

DENSITY / TRACK 


TVIMODE (DENSITY 

AND TRACK): 


NOTE: ODD/EVEN 


IS THE PARITY 


CV 


IS DATA CONVERSION 


TR 


IS BCD/EBCDIC TRANSLATION 


B'11001011 1 

800 

BPI/9 TRACK 


B 1 10010011 * 

800 

BPI/ODD/CV- ON/TR- OFF 


B * 10111011 1 

800 

BPI/ODD/CV- OFF/TR- ON 


B 1 10110011 1 

800 

BPI/ODD/CV- OFF/TR- OFF 


B f 10101011 f 

800 

BPI/EVEN/CV- OFF/TR- ON 


B'lOlOOOll* 

800 

BPI/EVEN/CV- OFF/TR- OFF 


B 1 01010011 1 

556 

BPI/ODD/CV- OFF/TR- OFF 


B* 01111011 1 

if 

II IV 


B 1 01110011 1 

IV 

«v n 


B f 01101011 1 

n 

n n 


B 1 01100011 1 

n 

if n 


B 1 00010011 1 

200 

BPI/ODD/CV- ON/TR- OFF 


B 1 00111011 1 

it 

n w 


B 1 00110011 1 

ii 

n n 


B 1 00101011 1 

n 

II VI 


B 1 00100011 1 

ii 

n n 


B 1 11000011 1 

1600 BPI/ 9TRACK 


B 1 11010011 1 

6250 BPI/ 9TRACK 


B 1 11011011 1 

38K 

BPI/ 18TRACK 

94 

TVIALT 4 

ALTERNATE TAPE DRIVE TAPE ID 

98 

TVIRING 6 

RING/NORING - WRITE ENABLE RING 

9E 

2 

UNUSED 

AO 

TVIEND 0 

END 

OF TVISECT 
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CROSS REFERENCE (Name Disp Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 


TVIALT 

0094 .. 

TVIFILID 

0050 . 

TVICRD 

003E .. 

TVIFSEQ 

0034 . 

TVICUU 

0084 .. 

TVIFUNCT 

0008 . 

TVIEXD 

0044 .. 

TVIGENN 

0004 . 

TVIFID 

0018 .. 

TVIGENV 

003C . 

TVIFILE 

0010 .. 




TVILABEL 

0088 .. 

TVISEC 

0029 .. 

TVIMOD 

0000 .. 

TVISYSPA 

004C .. 

TVIMODE 

0090 .. 

TVISYSPL 

004A .. 

TVIRING 

0098 .. 

TVIVQLID 

0 02A .. 

TVISCRAT 

0 07C .. 

TVIVSEQ 

0030 .. 
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USAVE 


USAVE: USER SAVE AREA 

USAVE is used by DMSITS to allocate and free save areas for other routines during 
SVC processing; it is pointed to by the USAVEPTR field in SSAVE. USAVE is invoked 
via the SVCSAVE macro. 


0 

58 


SIZE 

USER SAVE AREA SIZE IN DOUBLEHORDS (USAVESZ) 12 


CROSS REFERENCE (Name Diso Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

USAVESZ .... 18 
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USERSECT: USER WORK AREA 

USERSECT describes the USERSECT block which is a general scratch storage area 
provided for usei—defined purposes. It may be redefined to suit installation 
requirements. USERSECT is pointed to by the AUSER field in NUCON. 


0 

40 


USCRTCH 


HEX 

DISP 

NAME 

LEN KEY DESCRIPTION 

0 

USCRTCH 

72 


CROSS REFERENCE (Name Disc Value) 

This cross reference contains all the labels defined above as well as any 
general equates that the copy file may contain. 

USCRTCH 0000 . . 

USERSECT 0000 .. 
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SUMMARY OF CHANGES 


To obtain editions of this publication pertaining to earlier 
releases of VM/SP, you must order using the pseudo-number 
assigned to the respective edition. For: 


Release 4, 
Release 3, 
Release 2, 
Release 1, 


Order LT00-1606 
Order LT64-5221 
Order LQ60-0891 

Order LQ60-0891 Hhich includes TNLs to support Release 2. 


Summary of changes 
To LY24-5221-2 
for VM/SP Release 5 

MAJOR CHANGES 


New: Additions 


Eleven new data areas have been added to this volume — CPRB, CQYSECT, 
DMSFCACH, DMSFCHIN, DMSVIPWK, FLANGBLK, PARSERCB, PARSERUF, PVCENTRY , 
TRANTBL, and TVISECT. 


Changed: Control Blocks 

Minor changes have been made to many data areas in support of Release 5. The 
changed files can be located by the revision bar to the left of the page. 


Summary of changes 
To LY24-5221-1 
for VM/SP Release 4 


MAJOR CHANGES 

New: Additions 

Five new data areas have been added to this volume — EXISBLOK, FBLOCK, 
HASHTAB, HYPMAP, AND PMXMBLOK. 

XEDIT and EDIT DSECTS have been removed. These include DESTYP, EDCB, 
LSCREEN, PRSCB, RECSAVE, REQDES, SAVEREG, SYNSUB, ZDESC, ZFONC, ZMACST, and 
ZPACK. 

Changed: Control Blocks 

Minor changes have been made to many data areas in support of Release 4. 
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Summary of Changes 
to LY24-5221-0 
For VM/SP Release 3 


MAJOR CHANGES 

Changed: Book Structure 

The original Data AREA and Control Block Logic book has been reorganized and 
divided into two separate volumes. See the preface for more information. 


New: Additions 

Ten new data areas have been added to this volume. ABNXTCB, CMSLEVEL, 
COMCLIST, IMMBLOK, IMWKSECT, IUCVIDBK, IUCVPTBK, IUCVTAB, RTXSBFLD, SVCWORK. 

Changed: Control Blocks 

The following is a complete listing of the data areas that have been modified 
in this publication: ADTSECT, DESTYP, DEVTAB, EPLIST, FCBSECT, FRDSECT, 

FVSECT, IHADECB, LSCREEN, NUCON, OPSECT, PARMLIST, PROPCOM, PRSCB, QEL, 
RECSAVE, RTDSECT, SCBLOCK, SYNSUB, SYSNAMES, TOKLIST , ZDESC, ZFONC. 

MISCELLANEOUS CHANGES 

Changed: Documentation Only 

Minor technical and editorial changes have been made throughout this 
publication. 


Summary of Changes 
to LY20-0891-1 
as updated by LN24-5717 


MAJOR CHANGES 

New: Additions 

Thirteen data areas are added to this book. Four new CP areas are INTBLK, 
PFDATA, PFKTABLE AND RETBUF. NINE NEW CMS AREAS ARE EPLIST , LOGFBFMT , 
PARMLIST, PROPCOM, PROPTAB, QEL, RTDSECT, SHVBLQCK AND, TOKLIST. Minor 
changes have been made to many other data areas and control blocks. 

MISCELLANEOUS CHANGES 

Changed: Documentation Only 

Minor technical and editorial changes have been made throughout this 
publication. 
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Summary of Changes 
to LY20-089J-1 
for VM/SP Service Level 106 


MAJOR CHANGES 
New: Format 

This revision provides an easier to use format. The following are included 
in the new format. 

Graphic representations of the data areas and control blocks. 

All displacements are given in hexadecimal. 

Data area size values are given in hexadecimal numbers as compared to bit 
patterns in past editions. 

Bit values immediately follow the corresponding byte definition. 

The cross reference has a heading to describe what values it represents. 

Five data areas, MNCHLIST, ORDBLOK, PDSSECT, VBFBLOK and VMPSCOM, are added 
to the book. In addition, minor changes have been made to many other data 
areas and control blocks. 

MISCELLANEOUS CHANGES 

Changedt Documentation Only 

Minor technical and editorial changes have been made throughout this 
publication. 
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TERMINOLOGY 


The following terms in this publication 
refer to the indicated support devices: 


• 2305” Refers to IBM 2305 Fixed Head 
Storage, Models 1 AND 2. 

• "270X" Refers to IBM 2701, 2702, and 
2703 transmission control units or 
the integrated communications 
adapter (ICA) on the System/370 
Model 135. 

• "2741" Refers to the IBM 2741 and 
the 3767, unless otherwise 
specified. 

• "3066" Refers to the IBM 3066 System 
Console. 


• ”3350" Refers to the IBM 3350 Direct 
Access Storage Models A2 and B2 in 
native mode. 

• "3370" Refers to the IBM 3370 Direct 
Access Storage Model. 

• "3375" Refers to the IBM 3375 Direct 
Access Device. 

• "3380" Refers to the IBM 3380 Direct 
Access Storage. The Speed Matching 
Buffer Feature (NO. 6550) for the 
3380 supports the use of extented 
count-key-data channel programs. 

• "3430" Refers to the IBM 3430 
Magnetic Tape Subsystem. 


• "3081" Refers to the IBM 3081 
Processor Unit Model D16. 

• "3262" Refers to the IBM 3262 
Printer, Models 1, 5, and 11. 

• "3270" Refers to a series of display 
devices, namely, the IBM 3275, 3276, 
3277, 3278, 3279 Display Stations, 
and the 3290 Information Panel. A 
specific device type is used only 
when a distinction is required 
between device types. 

Information about display terminal usage 
also applies to the IBM 3138, 3148, and 
3158 Display Consoles when used in 
display mode, unless otherwise noted. 

Any information pertaining to the IBM 
3284 or 3286 Printer also pertains to 
the IBM 3287, 3288, and 3289 Printers, 
unless otherwise noted. 

• "FB-512" Refers to the IBM 3310 and 
3370 Direct Access Storage Devices. 

• "3330" Refers to the IBM 3330 Disk 
Storage, Models 1, 2, or 11; the IBM 
3333 Disk Storage and Control, 

Models 1 or 11; and the 3350 Direct 
Access Storage operating in 
3330/3333 Model 1 or 3330/3333 Model 
11 Compatibility Mode. 

• "3340" Refers to the IBM 3340 Disk 
Storage, Models A2, Bl, and B2, and 
the 3344 Direct Access Storage Model 
B2. 


• "3480" Refers to the IBM 3480 

Magnetic Tape Subsystem. 


• "37 OX" Refers to IBM 3704 and 3705 
Communications Controllers. 

• The term "3705" refers to the 3705 I 
and the 3705 II unless otherwise 
noted. 

• "3800" Refers to the IBM 3800 
Printing Subsystems, Models 1, 3, 
and 8. A specific device type is 
used only when a distinction is 
required between device types. 
References to the 3800 Model 3 apply 
to both models 3 and 8 unless 
otherwise explicitly stated. The 
IBM 3800 Model 8 is available obly 
in selected world trade countries. 

• "4245" Refers to the IBM 4245 Line 
Printer. 

• "4248" Refers to the IBM 4248 
Printer. 

• "4250" Refers to the IBM 4250 
Printer. 

• "4361" Refers to the IBM 4361 Model 
Groups 3, 4, and 5 Processor. 


• "4381" Refers to the IBM 4381 Model 

Groups 1 and 2 Processor. 
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PRE-REQUISITE PUBLICATIONS 


To use this publication effectively and to understand it thoroughly, the following 
publications are prerequisite: 

IBM System/370 Principles of Operation, GA22-7000 

IBM OS/VS, DOS/VS, and VM/370 Assembler Language, GC33-4010 

RELATED PUBLICATIONS 

This publication should be used in conjunction with: 

Virtual Machine/System Product: 

System Logic and Problem Determination Guide, 

Volume 1 CCP), Order No. LY20-0892 
Volume 2 (CMS), Order No. LY20-0893 
System Reference for CP Order No. SC24-5285 
System Reference for CMS Order No. SC24-5286 

Library Guide, Glossary, and Master Index, Order No. GC19-6207 
Virtual Machine: 

System Facilities for Programming Order No. SC24-5288 
Diagnosis Guide Order No. LY24-5241 

The following communications provide information about the VTAM Communications 
Network Application (VM/VCNA) Program Product. 

IBM VM/VCNA General Information, Order No. GC27-0501 

IBM VM/VCNA Installation, Operation, and Terminal Use, Order No. SC27-O502 
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